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routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UERROR 

Well-defined  module 

GETNNUM 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

i. 
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Module 

Module 

Name 

Name 

Type 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSECRF 

ERRPRO 

External 

routine 

INSECRT 

ERRPRO 

External 

routine 

INSGECLST 

MALLOC 

External 

routine 

INSHST 

ERRPRO 

External 

routine 

INSIAUC 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSKC 

ERRPRO 

External 

routine 

INSKCM 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSKW 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSKWAC 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSKWEC 
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Module 

Module 

Name 

Name 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSKWRC 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSLNKR 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSMOD 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

CDS DATE 

External 

routine 

INSNODE 

MALLOC 

External 

routine 

INSOAC 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSORDR 

MALLOC 

External 

routine 

INSPARM 
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Module 

Module 

Name 

Name 

Type 

ERRPRO 

External 

routine 

INSPART 

ERRPRO 

External 

routine 

INSPCB 

ERRPRO 

External 

routine 

INSPDF 

ERRPRO 

External 

routine 

INSPDI 

ERRPRO 

External 

routine 

INSPWRD 

ERRPRO 

External 

routine 

INSQCRF 

ERRPRO 

External 

routine 

INSQCTG 

ERRPRO 

External 

routine 

INSRC 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

STRLEN 

External 

routine 

INSRCRS 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSRNG 

ERRPRO 

External 

routine 

INSRSET 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

INSRTPA 

ERRPRO 

External 

routine 

INSRTYP 

ERRPRO 

External 

routine 

INSRULE 

ERRPRO 

External 

routine 

INSSCH 

ERRPRO 

External 

routine 
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INSSTM 


INSTAGLST 

INSTFLD 


INSTGPA 
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Module 

Name 

Module 

Type 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

MALLOC 

External 

routine 

SQLSCA 

Externa i 

routine 

SQLSCH 

Exte^ucj. 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 
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KCINH 
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Module 

Name 

Module 

Type 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

UERROR 

Well-defined  module 

GETNNUM 

External 

routine 

ERRPRO 

External 

routine 

INSAUC 

External 

routine 

INSIAUC 

External 

routine 

VERATAG 

Well-defined  module 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

INSKCM 

External 

routine 
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KCMDRP 


KCMSUBS 


KEYADS 


KEYLOCK 
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Module 

Module 

Name 

Type 

VERATAG 

Well-defined  module 

VERTKCM 

Well-defined  module 

KCINH 

External  routine 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

VTAGAUC 

Well-defined  module 

VERTKCM 

Well-defined  module 

DELAKCM 

External  routine 

DMIGKKC 

External  routine 

CPFONE 

External  routine 

UERROR 

Well-defined  module 

CPFNXT 

External  routine 

ERRPRO 

External  routine 

VERATAG 

Well-defined  module 

VERTKCM 

Well-defined  module 

FETITAG 

External  routine 

KEYSUB 

Well-defined  module 

CPFONE 

External  routine 

UERROR 

Well-defined  module 

CPFNXT 

External  routine 

LOWUPP 

Well-defined  module 

ERRPRO 

External  routine 

CHKCAT 

External  routine 

KCMSUBS 

External  routine 

KCMADD 

External  routine 

KCMDRP 

External  routine 

ERRPRO 

External  routine 
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Name  Name  Type 


TERKEY 

KEYSUB 

ERRPRO 

MODAAUC 

MODAKCM 

MODIAUC 

KYSTRUC 

ERRPRO 

DPKCLST 

ECSTRUC 

LDECLST 

UERROR 

ERRPRO 

LOADESC 

ERRPRO 

CLSFIL 

OPNFIL 

WRDSFL 

EDITCI 

FILEINS 

LOOPDEP 

LOWUPP 

TOUPPER 
I SLOWER 

LVLCHK 

ERRRPT 

COOPEN 

COCLOSE 

COFETCH 

COEXEC 

COBINDN 

Well-defined  module 

External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 

External  routine 
External  routine 
External  routine 

Well-defined  module 
External  routine 

External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 
External  routine 


External  routine 
External  routine 

External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
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LVLCHKl 


MALTOAT 


MAPADF 


MAPAREC 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

CODFINN 

External  routine 

COSQL3 

External  routine 

ERRRPT 

External  routine 

COOPEN 

External  routine 

COCLOSE 

External  routine 

COFETCH 

External  routine 

COEXEC 

External  routine 

COBINDN 

External  routine 

CODFINN 

External  routine 

COSQL3 

External  routine 

ERRPRO 

External  routine 

ADDPARM 

External  routine 

VERKCM 

Well-defined  module 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

INSAISM 

External  routine 

VALDTN 

Well-defined  module 

VERTAG 

Well-defined  module 

VERDTFL 

Well-defined  module 

VERECRT 

Well-defined  module 

VERMAPD 

Well-defined  module 

VERAIMR 

Well-defined  module 

INSPDF 

External  routine 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

VERDB 

Well-defined  module 

VERRT 

Well-defined  module 
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MAPAROJ 


MAPASET 


MAPRC 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

INSECRT  External  routine 


UERROR 

Well-defined 

module 

ERRPRO 

External  routine 

VERDB 

Well-defined 

module 

VERRT 

Well-defined 

module 

VERECRT 

Well-defined 

module 

VERRCT 

Well-defined 

module 

VERCRTC 

Well-defined 

module 

VALROJ 

Well-defined 

module 

SELCRDN 

Well-defined 

module 

INSIROJ 

External  routine 

UERROR 

Well-defined 

module 

ERRPRO 

External  routine 

INSAISM 

External  routine 

VERRT 

Well-defined 

module 

VERSMS 

Well-defined 

module 

CHKAUCV 

External  routine 

VERRCBS 

Well-defined 

module 

VERECRT 

Well-defined 

module 

VERAIMR 

Well-defined 

module 

VOMAPS 

Well-defined 

module 

INSAUCS 

External  routine 

UERROR 

Well-defined 

module 

FNDASA 

External  routine 

SPRINTF 

External  routine 

STRNCPY 

External  routine 

FNDIMEM 

External  routine 

VERRCMP 

Well-defined 

module 
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MGENENT 


MGENOA 


MGENREL 


MIGREL 


MKRNLSl 


MKRNLST 


MODAAUC 


PS41100  Main  Program  Parts  List 


Module 

Name 

Module 

Type 

INSRCRS 

External  routine 

ADDPARM 

COPEKW 

MGENOA 

External  routine 
External  routine 
Well-defined  module 

ERRPRO 

ADDPARM 

MALTOAT 

External  routine 
External  routine 
External  routine 

ADDPARM 

GENRNME 

MIGREL 

GENRKW 

External  routine 
External  routine 
Well-defined  module 
External  routine 

VERRCC 

ADDPARM 

NEXTKC 

SELIAUC 

Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 

UERROR 

CPFNXT 

CPFVAL 

VERKCMG 

Well-defined  module 
External  routine 
External  routine 
Well-defined  module 

CPFONE 

UERROR 

CPFNXT 

VERKCMG 

External  routine 
Well-defined  module 
External  routine 
Well-defined  module 

UERROR 

Well-defined  module 
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MODACEC 

MODACKW 


MODAISM 

MODAKCM 


Module 

Name 

Module 

Type 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 
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MODATT 

MODAUCE 


MODDBAL 

MODECKW 


Module 

Name 

Module 

Type 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

ERRPRO 

External 

routine 

CREATTR 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

ERRPRO 

External 

routine 
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Main  Pgro 

Module 

Module 

Name 

Name 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

MODENT 

ERRPRO 

External 

routine 

WRTENT 

External 

routine 

MODIAUC 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

MODKC 

ERRPRO 

External 

routine 

FNDEC 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

AKCROW 

External 

routine 

MODKCNM 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

MODLOC 

ERRPRO 

External 

routine 

MODOATT 

^  .  VRO 

External 

routine 

WF  rOAT 

Well-defined  module 

MODPCB 

ERRPRO 

External 

routine 

MODPWRD 

ERRPRO 

External 

routine 

MODRCKC 

ERRPRO 

External 

routine 

ENDEC 

External 

routine 

INITRDL 

External 

routine 

STARTBL 

Well-defined  module 

SELIKEY 

Well-defined  module 

MODRCKW 
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Module 

Name 

Module 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

SELECNM 

Well-defined  module 

GENDESC 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

FNDRCEC 

External 

routine 

ALLKEY 

External 

routine 

MGENREL 

External 

routine 
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Module 

Module 

Name 

Type 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

SELECNM 

Well-defined  module 

ADDPARM 

External 

routine 

GENDESC 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

SELACNM 

Well-defined  module 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

FNDRCEC 

External 

routine 

ALLKEY 

External 

routine 

GENCNMl 

External 

routine 

COPCKW 

External 

routine 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

MODRELl 

External 

routine 

MODREL 

External 

routine 

ERRPRO 

External 

routine 
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Module  Module 

Name  Type 


SQLSCA 

SQLSCH 

SQLSCC 

SQLOSQ 

SQLEXE 

SQLTFL 

SQLOPN 

SQLWNR 

STRNCPY 

SQLBS2 

ERRRPT 

SQLSQS 

SQLAB2 

CPFONE 

UERROR 

CPFNXT 

ERRPRO 

ADDPARM 

VERMOD 

NFLOPEN 

NFLCLOS 

EXCFLAG 

MRGMODl 

BLKCLST 

MRGNODE 

MRGMOD2 

ERRPRO 

BLKCLST 

ALLATT 


External 

External 

External 

External 

External 

External 

External 

External 

External 

External 

External 

External 

External 


External 

External 

External 


routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 


routine 

routine 

routine 


External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 
External  routine 
Well-defined  module 
External  routine 
Well-defined  module 
Well-defined  module 
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Name 


MRGM0D2 


MRGNODE 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

ALLENT  External  routine 


TOPNODE 

Well-defined  module 

ALLREL 

External 

routine 

ERRPRO 

External 

routine 

SELECNM 

Well-defined  module 

VERENT 

Well-defined  module 

ADDPARM 

External 

routine 

BLRCKC 

External 

routine 

VERCRNM 

Well-defined  module 

GENENTl 

External 

routine 

VERRCNM 

Well-defined  module 

GETRCID 

External 

routine 

GETCRID 

External 

routine 

MODRELl 

External 

routine 

MODREL 

External 

routine 

CKDUPEC 

External 

routine 

UERROR 

Well-defined  module 

SELECNM 

Well-defined  module 

VERENT 

Well-defined  module 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

GENENTl 

External 

routine 

GENALTE 

External 

routine 
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NCOMMIT 

NDDL/MAIN 


NEWTAGM 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

SPRINTF 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

STRNCPY 

External 

routine 

STRCPY 

External 

routine 

PRINTF 

External 

routine 

STRCAT 

External 

routine 

ERRTRAP 

External 

routine 

SCANF 

External 

routine 

SIGNAL 

External 

routine 

INITSES 

External 

routine 

PROCMD 

Well-defined  module 

TERMSES 

Well-defined  module 

TRMDDL 

Well-defined  module 

EXIT 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

NEXTKC 

STRNCPy 

External 

routine 

NEXTKCM 

STRNCPY 

External 

routine 

NFLCLOS 

FCLOSE 

External 

routine 

NFLOPEN 

UERROR 

Well-defined  module 

SPRINTF 

External 

routine 

ESCPY 

External 

routine 

FOPEN 

External 

routine 

NRGET 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLAB2 

External 

routine 

GETNXNO 

External 

routine 

DELREUS 

External 

routine 

NROLBAK 
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Main  Pgm 
Name 


NRSTORE 

OLDTAGM 

ORALON 

OUTDESC 

PI FROM 

PNOFROM 

PRESMIG 


Module 

Name 

Module 

Type 

ERRPRO 

External  routine 

MALLOC 

External  routine 

UERROR 

ERRPRO 

SELKCMA 

Well-defined  module 
External  routine 
Well-defined  module 

ERRPRO 

SQLSCA 

SQLADR 

SQLLOl 

External  routine 
External  routine 
External  routine 
External  routine 

ERRPRO 

OUTFIL 

CLSFIL 

OPNFIL 

External  routine 
External  routine 
External  routine 
External  routine 

ALLVIEW 

SMVIEW 

CHKDOMS 

External  routine 
Well-defined  module 
External  routine 

UERROR 

VERENT 

CHKDOMS 

Well-defined  module 
Well-defined  module 
External  routine 

UERROR 

ERRPRO 

UWARN 

DELKCMT 

DELAKCM 

Well-defined  module 
External  routine 
Well-defined  module 
External  routine 
External  routine 
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Main  Pgm 
Name 


PROCDT 


PROCMD 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

DMIGKKC 

External 

routine 

DELAUCL 

External 

routine 

DMIGKRC 

External 

routine 

DELIAUC 

External 

routine 

CPFONE 

External 

routine 

UERROR 

Well-defined  module 

CPFNXT 

External 

routine 

CPFCOR 

External 

routine 

LOWUPP 

External 

routine 

VERTYP 

Well-defined  module 

ADDDT 

External 

routine 

DRPDT 

External 

routine 

ALTDT 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

UWARN 

Well-defined  module 

GETNCHR 

External 

routine 

SPRINTF 

External 

routine 

STRNCPy 

External 

routine 

STRNCMP 

External 

routine 

STRCPY 

External 

routine 

COMMIT 

External 

routine 

ROLBACK 

Well-defined  module 

PMSGLS 

External 

routine 

RESETFN 

External 

routine 

COMMITMN 

External 

routine 

COMMITFN 

External 

routine 

RESETMN 

External 

routine 

INITCMD 

External 

routine 
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Main  Pgm 
Name 


PROCPRM 

RACKW2 

RCCHEK 

RCCHEKl 

RCLASA 


Module 

Name 

Module 

Type 

PDATA 

BRANCHR 

RMVPAG 

PUTCHAR 

YYPARSE 

OISCR 

GDATA 

RPLFRM 

External  routine 
External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 

UERROR 

CPFNXT 

CPFVAL 

LOWUPP 

ADDPRMS 

Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 

ERRPRO 

ADDPARM 

RETRACP 

External  routine 
External  routine 
Well-defined  module 

CPFNXT 

VERENT 

VERCR 

VERLR 

External  routine 
Well-defined  module 
Well-defined  module 
Well-defined  module 

VERENT 

VERCR 

VERLR 

Well-defined  module 
Well-defined  module 
Well-defined  module 

SQLSCA 

SQLSCH 

SQLSCC 

External  routine 
External  routine 
External  routine 
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Module 

Name 

Module 

Type 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 

CPARM 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 
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DOCGPO  u  £ 

Main  Pgm 
Name 

RDDESC 

RECKW2 

RECSEMS 

RELKW 

REMVIEW 

RENMOBJ 


PS41100  Main  Program  Parts  List 


Module 

Name 

Module 

Type 

CPARM 

External  routine 

UERROR 

FILEINS 

SPRINTF 

ERRRPT 

STRINS 

COOPEN 

COCLOSE 

COBINDN 

COSQL3 

Well-defined  module 
External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 

ERRPRO 

ADDPARM 

RETRECP 

External  routine 
External  routine 
Well-defined  module 

UERROR 

VERDTYP 

ERRPRO 

Well-defined  module 
Well-defined  module 
External  routine 

ERRPRO 

RETRCKW 

RRCKW2 

External  routine 
Well-defined  module 
Well-defined  module 

UERROR 

STRQCRF 

PI FROM 

VALVWRC 

PNOFROM 

Well-defined  module 
Well-defined  module 
External  routine 
Well-defined  module 
External  routine 

CPFONE 

External  routine 
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Main  Pgm 
Name 


Module 

Module 

Name 

Type 

UERROR 

Well-defined 

module 

CPFNXT 

External  routine 

LOWUPP 

External  routine 

VERKW 

Well-defined 

module 

VERDFID 

Well-defined 

module 

VERDB 

Well-defined 

module 

VERATT 

Well-defined 

module 

VERENT 

Well-defined 

module 

VERHST 

Well-defined 

module 

VERDOM 

Well-defined 

module 

VERMOD 

Well-defined 

module 

VERVIEW 

Well-defined 

module 

DELKW 

External  routine 

VERDI ID 

Well-defined 

module 

VERSTID 

Well-defined 

module 

VERRTID 

Well-defined 

module 

VERDTN 

Well-defined 

module 

RCCHEK 

External  routine 

RCCHEKl 

External  routine 

UPDECNM 

Well-defined 

module 

UPDACNM 

Well-defined 

module 

UPDRCNM 

Well-defined 

module 

UPDTKW 

Well-defined 

module 

UPDMNAM 

Well-defined 

module 

UPDTDOM 

Well-defined 

module 

UPDVIEW 

Well-defined 

module 

UPDHOST 

Well-defined 

module 

UPDDTI 

Well-defined 

module 

UPDSET 

Well-defined 

module 

UPDREC 

Well-defined 

module 

UPDFLD 

Well-defined 

module 
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Main  Pgm 

Module 

Name 

Name 

UPDDBN 

UPDDT 

MODACKW 

MODECKW 

MODRCKW 

RETACKW 

ERRPRO 

RETATTR 

ERRPRO 

RETDT 

ERRPRO 

RETECKW 

UERROR 

ERRPRO 

RETRACl 

ERRPRO 

VERATT 

ADDPARM 

RETRAC2 

ERRPRO 

ADDPARM 

VERATTP 

RETRACE 

ERRPRO 

RETRCKW 

ERRPRO 

RETRECl 

ERRPRO 

VERENT 

ADDPARM 

RETREC2 


Program  Parts  List 


Module 

Type 


Well-defined  module 
Well-defined  module 
External  routine 
External  routine 
External  routine 

External  routine 

External  routine 

External  routine 

Well-defined  module 
External  routine 

External  routine 
Well-defined  module 
External  routine 

External  routine 
External  routine 
Well-defined  module 

External  routine 

External  routine 

External  routine 
Well-defined  module 
External  routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

VERENTP 

Well-defined  module 

RETRECP 

ERRPRO 

External 

routine 

RETRFLD 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

RETRNGA 

ERRPRO 

External 

routine 

RNGVERF 

Well-defined  module 

RETSTD 

ERRPRO 

External 

routine 

RETVALA 

ERRPRO 

External 

routine 

VALVERF 

Well-defined  module 

RETVMOD 

ERRPRO 

External 

routine 

RNGVERF 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ROLBACK 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

SPRINTF 

External  routine 

NROLBAK 

External  routine 

RRCKW2 

ERRPRO 

External  routine 

ADDPARM 

External  routine 

GETRCNM 

External  routine 

GETCRNM 

External  routine 

SAVTAGS 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

SELIDSC 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

INSDESC 

External  routine 

SELACNM 

ERRPRO 

External  routine 

SELAIMP 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

DELIERT 

External  routine 

DELIAIM 

External  routine 

SELAIMT 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

DELIERT 

External  routine 

DELIAIM 

External  routine 

SELAISM 

ERRPRO 

External  routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

SELAPRM 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

SELCATC 

ERRPRO 

External  routine 

SELCATM 

ERRPRO 

External  routine 

SELCRAD 

ERRPRO 

External  routine 

SELCRDN 

ERRPRO 

External  routine 

SELDB 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

GENDB 

External  routine 

SELDBAA 

ERRPRO 

External  routine 

ADDPARM 

External  routine 

SELDBMS 

ERRPRO 

External  routine 

SELDBNM 

ERRPRO 

External  routine 

SELDBRT 

ERRPRO 

External  routine 

SELDESC 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 

INSDESC 

External  routine 

SELDFPM 

UERROR 

Well-defined  module 

ERRPRO 

External  routine 
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Main  Pgm 
Name 

SELDI 

SELDSTP 

SELECNM 

SELECXR 

SELHOST 

SELHP 

SELHSTS 

SELIAUC 


Module 

Name 

Module 

Type 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

WRTDSTP 

Well-defined  module 

ERRPRO 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

CPYIHST 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 
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Main  Pgm  Module  Module 

Name  Name  Type 


SQLSQS 

SQLAB2 

FMTIAUC 

SELIKEY 

ERRPRO 

SELKCM 

ERRPRO 

ADDPARM 

VERITAG 

SELKCMA 

UERROR 

ERRPRO 

SELMODS 

ERRPRO 

CPYISMD 

SELMREC 

ERRPRO 

UWARN 

GENMAP 

GENCRPT 

GENCRUN 

GENCREC 

SELMTAG 

ERRPRO 

UWARN 

GENMAP 

SELPARM 

UERROR 

ERRPRO 

SELPEC 

ERRPRO 

External  routine 
External  routine 
External  routine 

External  routine 

External  routine 
External  routine 
Well-defined  module 

Well-defined  module 
External  routine 

External  routine 
External  routine 

External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 

External  routine 
Well-defined  module 
External  routine 

Well-defined  module 
External  routine 

External  routine 
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Main  Pgm 
Name 

SELRCNM 

SELRELC 

SELRELL 

SELRMAP 


SELRSET 


SELRTPM 

SELSET 


Module 

Name 

Module 

Type 

ERRPRO 

UWARN 

External  routine 
Well-defined  module 

ERRPRO 

External  routine 

ERRPRO 

External  routine 

ERRPRO 

UWARN 

ADDPARM 

GENMREL 

External  routine 
Well-defined  module 
External  routine 
External  routine 

UERROR 

ERRPRO 

FNDASA 

ADDRNUM 

DELTEXT 

VERRSUS 

DELRST2 

VERRCBS 

DELSTM2 

Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 
Well-defined  module 
External  routine 

UERROR 

ERRPRO 

Well-defined  module 
External  routine 

ADDPARM 

SQLSCA 

SQLSCH 

SQLSCC 

SQLTOC 

External  routine 
External  routine 
External  routine 
External  routine 
External  routine 

3-352 


PS  620341100 
30  September  1990 


DOCGROUP 


Main  Pgm 
Name 


SELSETC 


SELSTM 
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Module 

Name 

Module 

Type 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

GENMREL 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 

ADDPARM 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

GENMREL 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

FNDASA 

External 

routine 

ADDRNUM 

External 

routine 

DELTEXT 

External 

routine 

VERRSUS 

Well-defined  module 

DELRST2 

External 

routine 

VERRCBS 

Well-defined  module 

DELSTM2 

External 

routine 

SELTGEC 

ERRPRO 

External 

routine 

SELUNIN 

ERRPRO 

External 

routine 

SELURT 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

DELUNIN 

External 

routine 

DELIERT 

External 

routine 

ECRTALL 

External 

routine 

DRPRULE 

External 

routine 

SETCOMM 

CPFONE 

External 

routine 

STRNCMP 

External 

routine 

SETGLOB 

UERROR 

Well-defined  module 

NFLOPEN 

External 

routine 

NFLCLOS 

External 

routine 

SPRINTF 

External 

routine 

SETOUT 

CPFONE 

External 

routine 

LOWUPP 

External 

routine 

ERRPRO 

External 

routine 

SETGLOB 

External 

routine 
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Main  Pgm  Module 

Name  Name 


SMVIEW 

UERROR 

GETNNUM 

VERSDT 

INSDI 

INSPDI 

GETDOM 

STARTBL 

UERROR 

ERRPRO 

SQLSCA 

SQLBSl 

SQLSCH 

SQLSCC 

SQLTOC 

SQLOSQ 

SQLADR 

SQLABl 

SQLEXE 

SQLCLS 

SQLADl 

SQLFCH 

BLDRCEC 

STRING 

UERROR 

ERRPRO 

DELTXT 

GETNCHR 

STRQCRF 

UERROR 

ERRPRO 


PS  620341100 
30  September  1990 


Parts  List 


Module 

Type 


Well-defined  module 
External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 

Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 

Well-defined  module 
External  routine 
External  routine 
External  routine 

Well-defined  module 
External  routine 
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Module 

Module 

Name 

Name 

Type 

INSQCRF 

External  routine 

INSQCTG 

External  routine 

STRTLST 

MALLOC 

External  routine 

TERATTR 

UERROR 

Well-defined  module 

GETNNUM 

External  routine 

ERRPRO 

External  routine 

INSAUC 

External  routine 

VEROAC 

Well-defined  module 

INSOAC 

External  routine 

VERKCM 

Well-defined  module 

BLDATTl 

External  routine 

KEY LOOK 

External  routine 

TERDIR 

CPFONE 

External  routine 

ERRPRO 

External  routine 

ICOPENT 

External  routine 

TERKEY 

UERROR 

Well-defined  module 

GETNNUM 

External  routine 

ERRPRO 

External  routine 

INSKC 

External  routine 

INSKCM 

External  routine 

TERMSES 

TERMFP 

External  routine 

TERREL 

CPFONE 

External  routine 

UERROR 

Well-defined  module 

CPFNXT 

External  routine 

ERRPRO 

External  routine 
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Module 

Module 

Name 

Name 

Type 

UWARN  Well-defined  module 


VERENT 

Well-defined  module 

ADDPARM 

External 

routine 

GENDESC 

External 

routine 

SELRELC 

External 

routine 

SELRELL 

External 

routine 

BLKCLl 

External 

routine 

GENALTE 

External 

routine 

NFLOPEN 

External 

routine 

NFLCLOS 

External 

routine 

LDECLST 

External 

routine 

COPEKW 

External 

routine 

COPVALI 

External 

routine 

COPOA 

External 

routine 

DEPKCM 

External 

routine 

DEPKCMl 

External 

routine 

GENDEP 

External 

routine 

GENCAT 

External 

routine 

GENIND 

External 

routine 

TERSIM 

GENGENC 

External 

routine 

CPFONE 

External 

routine 

UERROR 

Well-defined  module 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

GENDESC 

External 

routine 

NFLOPEN 

External 

routine 

NFLCLOS 

External 

routine 

COPEKW 

External 

routine 

COPVALI 

External 

routine 

COPOA 

External 

routine 
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Module 

Module 

Name 

Type 

GENKEY 

External 

routine 

CPFONE 

External 

routine 

UERROR 

Well-defined  module 

CPFNXT 

External 

routine 

ERRPRO 

External 

routine 

VERENT 

Well-defined  module 

ADDPARM 

External 

routine 

GENDESC 

External 

routine 

BLKCLl 

External 

routine 

GENALTE 

External 

routine 

NFLOPEN 

External 

routine 

NFLCLOS 

External 

routine 

LDECLST 

External 

routine 

DEPEC 

External 

routine 

COPEKW 

External 

routine 

COPVALI 

External 

routine 

COPOA 

External 

routine 

BLRCKCl 

External 

routine 

DEPENTD 

External 

routine 

DEPRELA 

External 

routine 

ADDPARM 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLAB2 

External 

routine 

FRELSTl 

External 

routine 

STRCPY 

External 

routine 

LOOPDEP 

External 

routine 

ADDNODE 

External 

routine 

STRTLST 

External 

routine 

TOPNODE 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLFCH 

External 

routine 

GENALTE 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLSQS 

External 

routine 

SQLAB2 

External 

routine 

GETECNM 

External 

routine 

TRADIR 

CPFONE 

External 

routine 

UERROR 

Well-defined  module 

GETNNUM 

External 

routine 

ERRPRO 

External 

routine 

WRTDESC 

Well-defined  module 
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Module 

Name 

Name 

INSECNM 

INSEC 

WRTECKW 

TRAP I L 

CPFONE 

UERROR 

ERRPRO 

ADDPARM 

GENDESC 

NFLOPEN 

NFLCLOS 

COPEKW 

COPVALI 

COPOA 

TRMDDL 

ERRPRO 
CDS  01 

TXTTYP 

CPFONE 

UERROR 

PRINTF 

CRTERR 

PMSGLS 

UINDDL/MAIN 

ERRPRO 

STRNCPY 

STRNCMP 

ERRTRAP 

SIGNAL 

INITSES 

PROCMD 

Program  Parts  List 


Module 

Type 


External  routine 
External  routine 
Well-defined  module 

External  routine 
Well-defined  module 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 

External  routine 
External  routine 

External  routine 

External  routine 
External  routine 
External  routine 

External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
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Module 

Name 

Module 

Type 

TERMSES 

External 

routine 

EXIT 

External 

routine 

INITAL 

External 

routine 

TRMDML 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 
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Module 

Name 

Module 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 
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UPDAUCE 


UPDAUCS 

UPDCRNM 


Module 

Name 

Module 

Type 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDAA 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDB 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDBH 
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Module 

Name 

Name 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDBN 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDDI 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 
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Module 

Name 

Module 

Type 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Main  Program  Parts  List 


Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDI 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDDT 

UERROR 

External 

routine 

UPDDDI 

External 

routine 

UPDEDF 

Well-defined  module 

UPDUDT 

Well-defined  module 

UPDMP 

Well-defined  module 

UPDDTI 

UERROR 

External 

routine 

UPDDI 

External 

routine 

UPDECAL 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 
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UPDECNM 
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Module 

Name 

Module 

Type 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPy 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLAB2 

External 

routine 

UPDFDF 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDFDFU 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDFLD 

UERROR 

External 

routine 

UPDFDF 

External 

routine 

UPDFDFU 

External 

routine 
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UPDHOST 


UPDHST 


PS41100  Main  Program  Parts  List 


Module 

Name 

Module 

Type 

UPDFPDF 

Well-defined  module 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UERROR 

External 

routine 

UPDHST 

Well-defined  module 

UPDDB 

External 

routine 

UPDDBH 

External 

routine 

UPDPSB 

Well-defined  module 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 
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UPDIND 

UPDKCT 


UPDLRNM 


UPDMIIAM 


Module 

Name 

Module 

Type 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCpy 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

CDS DATE 

External 

routine 

UPDMOD 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

CDS DATE 

External 

routine 

UPDMP 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDNXNO 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDPDF 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDPSB 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPy 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDRAUC 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDRCB 

SQLSCA 

External 

routine 
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Module 

Module 

Name 

Name 

Type 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDRCNM 

VERRCT 

Well-defined  module 

STRNCMP 

External 

routine 

UPDCRNM 

External 

routine 

UPDLRNM 

External 

routine 

UPDRDFU 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDREC 

UERROR 

External 

routine 
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Module 

Name 

Module 

Type 

UPDRT 

Well-defined  module 

UPDDF 

External 

routine 

UPDRRS 

Well-defined  module 

UPDDAA 

External 

routine 

UPDRSTM 

Well-defined  module 

UPDRRCB 

Well-defined  module 

UPDRDFU 

External 

routine 

UPDPDF 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 
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Name 

Name 

Type 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDRSS 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDRSTM 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDRT 

SQLSCA 

External 

routine 
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Name 


UPDRULE 

UPDSET 


UPDSMOD 

UPDSTM 


Module 

Name 

Module 

Type 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

UERROR 

External 

routine 

UPDRSS 

External 

routine 

UPDRCB 

External 

routine 

UPDSTM 

Well-defined  module 

UPDDFU 

External 

routine 

UPDAUC 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDTCR 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

3QLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

STRLEN 

External 

routine 

UPDTDOM 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

3-37Q 
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UPDTDT 

UPDTKW 


UPDTRC 


UPDUDT 


PS41100  Main  Program  Parts  List 


Module 

Name 

Module 

Type 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPy 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UPDVIEW 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

SQLWNR 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

UWARN 

PRINTF 

External 

routine 

CRTERR 

External 

routine 

PMSGLS 

External 

routine 

VALDROP 

UERROR 

External 

routine 

CPFNXT 

External 

routine 

ERR PRO 

External 

routine 

VERDBRT 

Well-defined  module 
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VALDTN 

VALROJ 

VALVERF 

VALVWRC 

VERACDT 

VERACNM 

VERAIM 

VERAIMD 

VERAIMR 

VERAISM 

VERALG 


PS41100  Main  Program  Parts  List 


Module 

Name 

Module 

Type 

VERPART 

DELHPN 

Well-defined  module 
External  routine 

UERROR 

VERDTYP 

ERRPRO 

UWARN 

External  routine 
Well-defined  module 
External  routine 
External  routine 

UERROR 

ERRPRO 

External 

External 

routine 

routine 

UERROR 

ERRPRO 

SELECNM 

CDP4A 

External 

External 

External 

External 

routine 

routine 

routine 

routine 

ERRPRO 

UWARN 

External 

External 

routine 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

VERAISM 

External 

routine 

VERALGI 

ERRPRO 

External 

routine 

VERALI 

ERRPRO 

External 

routine 

VERALMP 

ERRPRO 

External 

routine 

VERAODM 

ERRPRO 

External 

routine 

VERAPDF 

ERRPRO 

External 

routine 

VERAPRM 

ERRPRO 

External 

routine 

VERAREA 

ERRPRO 

External 

routine 

VERARL 

ERRPRO 

External 

routine 

VERATAG 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

SQLTFL 

External 

routine 
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Main  Pgm 

Module 

Name 

Name 

SQLOPN 

VERATT 

ERRPRO 

VERATTP 

ERRPRO 

VERAUC 

ERRPRO 

VERCMSV 

ERRPRO 

VERCMU 

ERRPRO 

VERCR 

ERRPRO 

VERCRC 

ERRPRO 

VERCRDA 

ERRPRO 

VERCRNM 

ERRPRO 

VERENT 

VERCR 

VERCRTC 

ERRPRO 

VERDB 

ERRPRO 

VERDBA 

ERRPRO 

ADDPARM 

VERDBAA 

ERRPRO 

VERDBAL 

Program  Parts  List 

Module 

Type 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 
Well-defined  module 
External  routine 

External  routine 

External  routine 

External  routine 
External  routine 

External  routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ERRPRO 

External 

routine 

VERDBAS 

ERRPRO 

External 

routine 

VERDBH 

ERRPRO 

External 

routine 

VERDBMS 

ERRPRO 

External 

routine 

VERDBRL 

ERRPRO 

External 

routine 

VERDBRT 

ERRPRO 

External 

routine 

VERDBST 

ERRPRO 

External 

routine 

VERDF 

ERRPRO 

External 

routine 

VERDFDT 

ERRPRO 

External 

routine 

UWARN 

External 

routine 

VERDFID 

ERRPRO 

External 

routine 

VERDFLD 

ERRPRO 

External 

routine 

VERDFPA 

ERRPRO 

External 

routine 

VERDFUS 

ERRPRO 

External 

routine 

VERDI 

ERRPRO 

External 

routine 

VERDI DN 

ERRPRO 

External 

routine 

VERDI DT 

3-385 


DOCGROUP 

Main  Pgm 
Name 


VERDI ID 

VERDI PA 

VERDOM 

VERDPSB 

VERDSCT 

VERDSL3 

VERDSTP 

VERDT 

VERDTD 

VERDTFL 

VERDTN 
VERDTYP 
VERDUN I 
VERECN 
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Module 

Name 

Module 

Type 

ERRPRO 

UWARN 

External 

External 

routine 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

GETDTN 

External 

External 

routine 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ERRPRO 

External 

routine 

VERECRT 

ERRPRO 

External 

routine 

VERENT 

ERRPRO 

External 

routine 

VERENTP 

ERRPRO 

External 

routine 

VERERMD 

ERRPRO 

External 

routine 

VERFJOB 

ERRPRO 

External 

routine 

CLSFIL 

External 

routine 

OPNFIL 

External 

routine 

GETHOST 

External 

routine 

GENFIL 

External 

routine 

CDMACR 

External 

routine 

VERHORZ 

ERRPRO 

External 

routine 

VERHPDF 

ERRPRO 

External 

routine 

VERHPN 

ERRPRO 

External 

routine 

VERHPST 

ERRPRO 

External 

routine 

VERHST 

ERRPRO 

External 

routine 

VERHZP 

ERRPRO 

External 

routine 

VERIREL 

ERRPRO 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

VERITAG 

ERRPRO 

External 

routine 

VERKC 

ERRPRO 

External 

routine 

VERKCM 

ERRPRO 

External 

routine 

VERKCMG 

ERRPRO 

External 

routine 

VERKCT 

ERRPRO 

External 

routine 

VERKCTl 

ERRPRO 

External 

routine 

VERKW 

ERRPRO 

External 

routine 

VERKWE 

ERRPRO 

External 

routine 

VERKWR 

ERRPRO 

External 

routine 

VERLR 
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Main  Pgm  Module  Module 

Name  Name  Type 


ERRPRO 

VERLUW 

ERRPRO 

VERMAPD 

ERRPRO 

VERMOD 

ERRPRO 

VERMPDF 

ERRPRO 

VERMPDT 

ERRPRO 

VERMUNI 

ERRPRO 

VERNMA 

ERRPRO 

VERNME 

ERRPRO 

VEROAC 

ERRPRO 

VEROBJ 

UERROR 

CPFNXT 

VERKW 

VERDB 

VERATT 

VERENT 

VERCR 

VERHST 

VERDOM 

VERRT 

VERLR 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 

External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
External  routine 
Well-defined  module 
External  routine 


3-389 


DOCGROUP 


Main  Pgm 
Name 


VEROBJl 
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Module 

Module 

Name 

Type 

VERMOD 

External  routine 

VERRSET 

Well-defined  module 

VERVIEW 

Well-defined  module 

SPRINTF 

External  routine 

STRNCMP 

External  routine 

TOUPPER 

External  routine 

VERDI 

External  routine 

VERUDTN 

Well-defined  module 

VERDFLD 

External  routine 

UERROR 

External  routine 

CPFNXT 

External  routine 

VERKW 

External  routine 

VERDB 

External  routine 

VERATT 

External  routine 

VERENT 

External  routine 

VERCR 

External  routine 

VERHST 

External  routine 

VERDOM 

External  routine 

VERRT 

Well-defined  module 

VERLR 

External  routine 

VERMOD 

External  routine 

VERRSET 

Well-defined  module 

VERVIEW 

Well-defined  module 

SPRINTF 

External  routine 

STRNCPY 

External  routine 

STRNCMP 

External  routine 

TOUPPER 

External  routine 

VERDI 

External  routine 

VERUDTN 

Well-defined  module 

VERDFLD 

External  routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

VERPARM 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

VERPART 

ERRPRO 

External 

routine 

VERPASS 

ERRPRO 

External 

routine 

VERPCB 

ERRPRO 

External 

routine 

VERPSB 

ERRPRO 

External 

routine 

VERRCB 

ERRPRO 

External 

routine 

VERRCBS 

ERRPRO 

External 

routine 

VERRCC 

ERRPRO 

External 

routine 

VERRCMP 

ERRPRO 

External 

routine 

VERRCNM 

ERRPRO 

External 

routine 

VERENT 

External 

routine 

VERLR 

External 

routine 

VERRCST 

ERRPRO 

External 

routine 

VERRCT 

ERRPRO 

External 

routine 

VERREC 

ERRPRO 

External 

routine 

VERRNG 

ERRPRO 

External 

routine 

3-391 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Main  Program  Parts  List 


Main  Pgm 

Module 

Module 

Name 

Name 

Type 

VERROJ 

ERRPRO 

External 

routine 

VERROJR 

ERRPRO 

External 

routine 

VERRPS 

ERRPRO 

External 

routine 

VERRSET 

ERRPRO 

External 

routine 

VERRSUS 

ERRPRO 

External 

routine 

VERRT 

ERRPRO 

External 

routine 

VERRTID 

ERRPRO 

External 

routine 

VERRTNO 

ERRPRO 

External 

routine 

VERRULE 

ERRPRO 

External 

routine 

VERSCH 

ERRPRO 

External 

routine 

VERSDT 

ERRPRO 

External 

routine 

VERSMOD 

ERRPRO 

External 

routine 

VERSMS 

ERRPRO 

External 

routine 

VERSTID 

ERRPRO 

External 

routine 

VERTAG 

ERRPRO 

External 

routine 

VERTAP 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

ERRPRO 

External 

routine 

VERTAUC 

ERRPRO 

External 

routine 

VERTKCM 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

SQLSCA 

External 

routine 

SQLBSl 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLTOC 

External 

routine 

SQLOSQ 

External 

routine 

SQLADR 

External 

routine 

SQLABl 

External 

routine 

SQLEXE 

External 

routine 

SQLCLS 

External 

routine 

SQLADl 

External 

routine 

SQLFCH 

External 

routine 

VERTMAP 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

VERTAP 

External 

routine 

VERTPDI 

Well-defined  module 

VERVWQU 

Well-defined  module 

VERTAUC 

External 

routine 

VERTPDI 

ERRPRO 

External 

routine 

VERTYP 

ERRPRO 

External 

routine 

VERUDT 

ERRPRO 

External 

routine 
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VERUDTN 

VERUNIN 

VERVAL 

VERVIEW 

VERVWQU 

VMODPRM 

VOMAPS 

VROBJ 


PS41100  Main  Program  Parts  List 


Module 

Name 

Module 

Type 

CONVCHR 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

ERRPRO 

External 

routine 

UERROR 

ERRPRO 

VERSDT 

INSPARM 

External 

External 

External 

External 

routine 

routine 

routine 

routine 

UERROR 

ERRPRO 

External 

External 

routine 

routine 

UERROR 

CPFNXT 

VERKW 

VERDB 

VERATT 

VERENT 

VERCR 

VERHST 

VERDOM 

VERRT 

VERLR 

External 

External 

External 

External 

External 

External 

External 

External 

External 

External 

External 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 

routine 
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VROBJl 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

VERMOD 

External 

routine 

VERRSET 

External 

routine 

VERVIEW 

External 

routine 

SPRINTF 

External 

routine 

STRNCMP 

External 

routine 

TOUPPER 

External 

routine 

VERDI 

External 

routine 

VERUDTN 

External 

routine 

VERDFLD 

External 

routine 

UERROR 

External 

routine 

CPFNXT 

External 

routine 

VERKW 

External 

routine 

VERDB 

External 

routine 

VERATT 

External 

routine 

VERENT 

External 

routine 

VERCR 

External 

routine 

VERHST 

External 

routine 

VERDOM 

External 

routine 

VERRT 

External 

routine 

VERLR 

External 

routine 

VERMOD 

External 

routine 

VERRSET 

External 

routine 

VERVIEW 

External 

routine 

SPRINTF 

External 

routine 

STRNCPY 

External 

routine 

STRNCMP 

External 

routine 

TOUPPER 

External 

routine 

VERDI 

External 

routine 

VERUDTN 

External 

routine 

VERDFLD 

External 

routine 
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VTAGAUC 

WRDSFL 

WRTACKW 

WRTALG 

WRTALI 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLFCH 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAD2 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

GETHOST 

External 

routine 

GENFIL 

External 

routine 

OUTDESC 

External 

routine 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

INSKWAC 

External 

routine 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

AODPARM 

External 

routine 

GTCNTPR 

External 

routine 

GTDIPR 

External 

routine 

GTAUCPR 

External 

routine 
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WRTANAM 

WRTDESC 


WRTDITM 

WRTDSTP 

WRTECKW 

WRTENAM 


PS41100  Main  Program  Parts  List 


Module 

Module 

Name 

Type 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

UWARN 

External 

routine 

VERATT 

External 

routine 

INSACNM 

External 

routine 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

INSACNM 

External 

routine 

SQLSCA 

External 

routine 

SQLSCH 

External 

routine 

SQLSCC 

External 

routine 

SQLOSQ 

External 

routine 

SQLEXE 

External 

routine 

SQLTFL 

External 

routine 

SQLOPN 

External 

routine 

STRNCPY 

External 

routine 

SQLBS2 

External 

routine 

ERRRPT 

External 

routine 

SQLAB2 

External 

routine 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

ADDPARM 

External 

routine 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

INSKWEC 

External 

routine 
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Main  Pgm 

Module 

Module 

Name 

Name 

Type 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

VERENT 

External 

routine 

INSECNM 

External 

routine 

WRTLIN 

STRNCPY 

External 

routine 

PMSGLS 

External 

routine 

PUTC 

External 

routine 

WRTOAT 

ERRPRO 

External 

routine 

GENDESC 

External 

routine 

VERKCM 

External 

routine 

FNDEC 

External 

routine 

GENALI 

External 

routine 

GENATT 

External 

routine 

WRTSLCT 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

VreTWHCL 

UERROR 

External 

routine 

ERRPRO 

External 

routine 

ADDPARM 

External 

routine 

SELTGEC 

External 

routine 

YYERROR 

UERROR 

External 

routine 

FREE  SYMTAB 

External 

routine 

SPRINTF 

External 

routine 

YYNULL 

YYPARSE 

PRINTF 

External 

routine 

ADD_TO_LST 

External 

routine 
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Module 

Name 

Module 

Type 

ADD  CORK 

External 

routine 

PUT  SYMB 

External 

routine 

CHAIN  SYMB 

External 

routine 

ADD  TO  CNT 

External 

routine 

YYERROR 

External 

routine 

MEMCPY 

External 

routine 

NEW  SCOPE 

External 

routine 

YYNULL 

External 

routine 

EXIT  SCOPE 

External 

routine 

YYLEX 

External 

routine 
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3.10.4  Module  Documentation 

The  following  documentation  describes  information 
which  is  specific  to  each  individual  module  in  the 
documentation  group  being  documented  in  this  specification. 

It  provides  a  compact  way  of  getting  information  that  would 
be  otherwise  buried  within  each  module's  source  code. 

The  specific  items  in  this  module  documentation  have  the 
following  meanings: 


NAME:  Name  of  program  Module. 


PURPOSE : 

Purpose  of  Module  as  detailed  in  the 
source  code. 

LANGUAGE : 

Programming  language  source  code  is 
written  in. 

The  choices  are: 

VAX- 11  FORTRAN 

C  (I/S-1  Workbench  'C') 

VAX- 11  COBOL 

MODULE  TYPE: 

Whether  a  Program,  Subroutine,  or 
Function. 

SOURCE  FILE: 

Name  of  Source  File  from  file 
specification. 

SOURCE  FILE  TYPE: 

Source  File  Extension  from  file 
specification. 

HOST: 

Whether  this  is  a  host-dependent 
routine  (VAX  or  IBM)  or  blank  if 
host-independent . 

SUBSYSTEM: 

IISS  sub-system  this  file  resides  in. 

SUBDIRECTORY : 

Sub-directory  of  that  subsystem  in 
which  this  file  resides. 

DOCUMENTATION  GROUP: 

Name  of  documentation  group  of  which 
this  source  file  is  a  member. 

DESCRIPTION: 

A  description  of  the  module  as  otained 
from  the  source  code. 

ARGUMENTS : 

The  arguments  with  which  this  routine 
is  called  if  it  is  a  Subroutine  or  a 
Function. 

INCLUDE  FILES: 

A  list  of  all  the  files  that  are 
included  into  this  module  as  well  as 
their  purposes. 

ROUTINES  CALLED: 

Subroutines  or  Functions,  either 
documented  or  external,  called  by 
this  module,  if  any. 
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CALLED  DIRECTLY  BY:  The  documented  routines  which  call 

this  module,  if  any. 

USED  IN  MAIN  PROGRAM (S) :  The  documented  Main  Programs  which 

contain  this  module  in  their  parts 
list  according  to  the  list  in  section 
3.10.3. 


The  Module  Documentation  is  arranged  alphabetically  according 
to  Module  Name. 


DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDATT 

PURPOSE:  ASSOCIATES  EXISTING  ATT  WITH  ENTITY  IN  GREAT  ENTITY 
COMMAND 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ADDATT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION; 


ADDATT  ASSOCIATES  AN  EXISTING  ATTRIBUTE  WITH  AN 
ENTITY  CLASS  IN  THE  CREATE  ENTITY  COMMAND. 


ARGUMENTS : 


DSPLY[S9(9) ] 
DSPLY[S9 (9) ] 


INCLUDE  FILES: 


LISTNOS 


MODEL-NO 

EC-NO 


ROUTINES  CALLED: 


CPFONE 

ADDOAC 

UERROR 

CPFNXT 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDDT 

PURPOSE:  ADD  DATA  TYPES  TO  CDM  DATA  BASE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDDT 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THE  ADD  DATA  TYPE  CLAUSE  ADDS  THE  DATA  TYPE  NAME, 
TYPE,  SIZE  AND  LENGTH  OF  FIELD,  GIVEN  THE  DOMAIN 
NUMBER 

SELECT  THE  DATA  TYPE  NAME,  ID,  SIZE, 

NAMES  OF  DECIMALS,  AND  WHETHER  THE  TYPE 
IS  STANDARD  OR  USER-DEFINED.  ADD  THE 
PARTICULAR  TYPE  GIVEN  THE  DOMAIN  NUMBER. 

REPEAT  FOR  EACH  DATA  TYPE  TO  BE  ADDED. 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

DATA-TYPE-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

STD-USER 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 
DSPLYtX(30)  ] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X(4)  ] 


ROUTINES  CALLED: 


UERROR 

ADDSTD 

ADDNSTD 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDFLDS 

PURPOSE;  PROCESSES  ADD  RECORDS  FOR  THE  ALTER  RECORD  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDFLDS 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 

DESCRIPTION; 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  ADDING  AREA  OR 
FIELD  INFORMATION  FOR  THE  ALTER  COMMAND. 

12/18/89  -  ADDED  "H"  FOR  OVERPUNCHED  DATATYPE  AS  VALID  FOR 
CODASYL 

EXTRACT  ALL  INFORMATION  FROM  CPFONE, 

AND  VERIFY  INFORMATION  BY  CHECKING  LEVELS, 

SUB-COMPONENTS,  INDEXING,  REDEFINES,  ETC. 

ARGUMENTS : 


DBMS -NAME 

DB-ID 

RT-ID 

NDDL-STATUS 


DSPLY[X(30) ] 
DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

DFTBL 

UNIQENO 

TDFTBL 

ERRPRO 


ROUTINES  CALLED: 


CPFCOR 

CPFVAL 

CPFONE 

LOWUPP 

UERROR 

CONVCPF 

RETRFLD 

GETNNUM 

VERDTYP 

CPFNXT 

RECSEMS 

DELFLDA 

INSTFLD 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME;  ADDKC 

PURPOSE:  CONTROLS  PROCESS  FOR  KEY  CLASS  CLAUSE  FOR 
CREATE/ALTER  ENTITY 
LANGUAGE;  VAX- 11  COBOL 
SOURCE  FILE:  ADDKC 
SOURCE  FILE  TYPE:  COB 
HOST  • 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ADD.'C  CONTROLS  THE  PROCESSING  OF  THE  KEY  CLASS 
CLAUSE  FOR  THE  CREATE  AND  ALTER  ENTITY  COMMANDS. 

KEY  CLASS  CLAUSE  CONSISTS  OF  AN  KEY  CLASS 
NAME,  FOLLOWED  BY  AN  OPTIONAL  LIST  OF  ATTRIBUTE  USE 
CLASS  NAMES.  THE  CLAUSE  IS  RECURSIVE.  KEY  CLASS  NAME 
IS  ON  A-KC-LST,  NO.  OF  ATTRIBUTE  FOR  KEY  CLASS  IN 
A-NUM-LST  AND  LIST  OF  ATTRIBUTE  IN  A-AUC-LST. 

ODIFIED  5/5/89:  TO  HANDLE  PRIMARY  AND  ALTERNATE  KEY  CLASS  TYPES 


ARGUMENTS ; 


MODEl-NO 

EC-NO 


DSPLYtS9(9)  ] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 

ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERKCT 

CPFVAL 

CPFNXT 

VERKC 

UERROR 

GETNNUM 

INSKC 

ADDKM 


3-404 


PS  620341100 
30  September  1990 


E)OCGROUP  PS41100  Module  Documentation 


NAME:  ADDKM 

PURPOSE:  ADDS  SINGLE  KEY  CLASS  MEMBER (AUC)  TO  KEY  CLASS  FOR 
ADD  KEY 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ADDKM 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ADDKM  ADDS  A  SINGLE  KEY  CLASS  MEMBER  (ATTRIBUTE 
USE  CLASS)  TO  A  KEY  CLASS.  USED  BY  ANY  COMMANDS 
CONTAINING  AN  ADD  KEY  CLASS  CLAUSE. 


ARGUMENTS : 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


MODEL-NO 

AUC-NAME 

KC-NO 

EC-NO 


ROUTINES  CALLED: 


VTAGAUC 

ADDOAC 

UERROR 

INSKCM 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDKW 

PURPOSE:  ADDS  KEYWORDS  FOR  COMMANDS  USING  "ADD 
KEYWORD" (OPTIONAL) 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ADDKW 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ADDKW  PROCESSES  THE  "ADD  KEYWORD"  CLAUSE  FOR 
ANY  COMMAND  USING  KEYWORDS.  THE  CLAUSE  IS 
OPTIONAL  AND  MAY  NOT  EXIST. 


ARGUMENTS : 


OBJECT-TYPE 

OBJ-ID-NO 

RTN-STATUS 


RECRD 

DSPLY[S9(9) ] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 


ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERKW 

GETNNUM 

INSKW 

UERROR 

ADDKWA 

ADDKWE 

ADDKWR 

CPFNXT 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDKWA 

PURPOSE:  INSERT  AN  ATTRIBUTE  KEYWORD 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDKWA 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHECKS  FOR  THE  PRESENCE  OF  A  KEYWORD  ON  AN 
ATTRIBUTE,  AND  IF  NOT  FOUND,  INSERTS  IT. 


DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[S9 (9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ARGUMENTS : 


AC-NO 

KW-NO 

RETRN-CODE 


ROUTINES  CALLED: 


UERROR 

INSKWAC 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDKWE 

PURPOSE:  INSERT  AN  ENTITY  KEYWORD 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDKWE 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHECKS  FOR  THE  PRESENCE  OF  A  KEYWORD  ON  AN 
ENTITY,  AND  IF  NOT  FOUND,  INSERTS  IT. 


ARGUMENTS : 


KW-NO 

EC-NO 

RETRN-CODE 


DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


UERROR 

INSKWEC 

ERRPRO 


3-408 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDKWR 

PURPOSE;  INSERT  A  RELATION  KEYWORD 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE;  ADDKWR 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHECKS  FOR  THE  PRESENCE  OF  A  KEYWORD  ON  A 
RELATION  CLASS,  AND  IF  NOT  FOUND,  INSERTS  IT. 


ARGUMENTS : 


KW-NO 

RC-NO 

RETRN-CODE 


DSPLY[S9 (9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


UERROR 

INSKWRC 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  ADDMAP 

PURPOSE:  PROGRAM  NAME  ADDMAP 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDMAP 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  CALLED  FROM  CRTMAP  AND  ALTMAP,  THIS  PROGRAM 
VALIDATES  ALL  COMMON  PARAMETERS  ENTERED  FROM 
VARIOUS  LISTS  THEN  CALLS  SUBPROGRAMS  TO  ADD 
THE  MAPPING  DEFINITION. 

JUNE  1987  -  MODIFICATIONS  MADE  FOR  "CREATE 
MAP"  TO  PROCESS  ENTITY  TO  RECORD  MAPPINGS. 

MAY  1989  -  ADDED  CALL  TO  ROUTINE  MAPAROJ 
FOR  RECORD  OUTER  JOIN  (REL  2.7). 

ARGUMENTS : 


MAP-TYPE 

EC-NO 

TAG-NO 

RC-NO 

PREF-NO 

TAG -NAME 

EC-NAME 

MAP-CMD 

MAP-CATEGORY 

MAP-CLASS 

INCLUDE  FILES: 


DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  3 
DSPLY[X(30) 3 
DSPLYtX(30)  3 
DSPLY[X(3)  3 
DSPLY[X(8)  3 
DSPLY[X(30)  3 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFVAL 

CPFNXT 

VERHZP 

LOWUPP 

CHKSTMP 

VERAISM 

CHKHPRT 

VERDFID 

VERHPDF 

MAPADF 

VERDB 

FNDASA 

VERHPST 

MAPASET 
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CPFONE 

CPFCOR 

MAPRC 

MAPAREC 

MAPAROJ 

UERROR 

EPvRPRO 

DOCGROUP  PS41100  Module  Documentation 
NAME:  ADDMIG 

PURPOSE:  PROCESS  THE  ADD  MIGRATES ...  SET. . CLAUSE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDMIG 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


CONTROLS  THE  "ADD  MIGRATES"  CLAUSE  OF  THE  CREATE 
AND  ALTER  RELATION  COMMANDS.  MIGRATES  THE  KEY 
CLASS  FROM  THE  INDEPENDENT  TO  THE  DEPENDENT 
ENTITY  CLASS.  THE  MIGRATES  CLAUSE  IS  OPTIONAL. 

THE  CLAUSE  CONSISTS  OF  A  KEY-CLASS  NAME  AND  AN 
OPTIONAL  SET  CLAUSE. 

MODIFIED:  4-24-89 

: ADDED  FORCE  MIGRATION  OF  PRIMARY  KEY  IF  AVAILABLE 


ARGUMENTS : 


MODEL-NO 

RC-NO 

IND-EC-NO 

DEP-EC-NO 

COMMAND-TYPE 

RETRN-CODE 


DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9 (9)  ] 
DSPLY[X(5)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


SRVRET 

LISTNOS 

UNIQENO 

RENLIST 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERKCT 

SELECNM 

UWARN 

VERKC 

UERROR 

VERRCC 

MKRNLST 

CKRNLST 

VERAUC 
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GETNNUM 

INSAUC 

INSIAUC 

INSCRC 

ERRPRO 

DOCGROUP  PS41100  Module  Documentation 
NAME:  ADDMIGC 

PURPOSE:  PROCESS  THE  MIGRATES  ... SET. . CLAUSE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDMIGC 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


CONTROLS  THE  "ADD  MIGRATES”  CLAUSE  OF  THE  CREATE 
AND  ALTER  CATEGORY  COMMANDS.  MIGRATES  THE  PRIMARY 
KEY  CLASS  FROM  THE  GENERIC  TO  THE  CATEGORY  MEMBER 
ENTITY  CLASS.  THE  CLAUSE  CONSISTS  OF  AN 
OPTIONAL  SET  CLAUSE. 


DSPLYtS9{9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9) ] 


SRVRET 

LISTNOS 

UNIQENO 

RENLIST 

ERRPRO 

ROUTINES  CALLED: 


VERKCT 

SELECNM 

UERROR 

GETNNUM 

INSKC 

MKRNLSl 

CKRNLST 

VERAUC 

INSAUC 

INSIAUC 

INSKCM 

ERRPRO 


ARGUMENTS : 


MODEL-NO 

RC-NO 

GEN-EC-NO 

CAT-EC-NO 

RETRN-CODE 

INCLUDE  FILES: 
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DOCGROUP  PS41100  Module  Documentation 
NAME;  ADDNSTD 

PURPOSE:  ADDS  A  USER  DEFINED  DATA  TYPE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDNSTD 

SOURCE  FILE  TYPE:  COB 

HOST; 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


THIS  ROUTINE  ADDS  A  "USER”  DEFINED  DATA  TYPE 

AFTER  VERIFYING  THAT  THE  DATA  TYPE 
TO  BE  ADDED  DOES  NOT  ALREADY  EXIST, 

CHECK  IF  A  LEGAL  DATA  TYPE,  WITH 
CORRECT  DECIMAL  SPECIFICATIONS  BEFORE 
INSERTING,  AS  A  "USER"  DEFINED  DATA 
TYPE. 

ARGUMENTS : 


DOM-NO 

DATA-TYPE-NAME 
TYPE-ID 
MAX-SIZE 
NO-OF-DEC 
RETURN -STATUS 


DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


ROUTINES  CALLED: 


VERDT 
U ERROR 
INSDT 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ADDOAC 

PURPOSE:  ADD  ATTRIBUTE  AS  AN  OWNED  ATTRIBUTE  AND  AS  ATT  USE 
CLASS 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  ADDOAC 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


GIVEN  AN  ATTRIBUTE  NAME,  ADD  IT  AS  AN  OWNED 
ATTRIBUTE  AND  AS  AN  ATTRIBUTE  USE  CLASS. 


ARGUMENTS : 

MODEL-NO 

DSPLY[S9 (9) ] 

EC-NO 

DSPLY[S9(9) ] 

AC-NAME 

DSPLY[X(30) ] 

NEW-TAG-NO 

DSPLY[S9(9) ] 

INCLUDE  FILES: 

UNIQENO 

ERRPRO 

ROUTINES  CALLED: 

VERATT 

VEROAC 

UERROR 

INSOAC 

GETNNUM 

INSAUC 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  ADDPARM 

PURPOSE:  WRITES  78  CHAR  NDDL  COMMAND  WITH  PARAMENTERS 
CHECKS/ DELIMITER 
LANGUAGE:  VAX-11  COBOL 
SOURCEFILE:  ADDPARM 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


LANGUAGE:  VAX- 11  COBOL 

DESCRIPTION: 


FROM  CALLS  TO  SUBPROGRAM  ADDPARM. 
ARGUMENTS : 

TEXT-PARM  DSPLY[X(60)] 

DELIMTR  DSPLY[X] 

ROUTINES  CALLED: 

WRTLIN 


DOCGROUP  PS41100  Module  Documentation 
NAME:  ADDPRMS 

PURPOSE:  ADD  PARAMETERS  TO  INTERNAL  TABLE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDPRMS 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  OBTAIN  PARAMETER  NAME  AND  DATA  TYPE  NAME 
FROM  PARSER.  VERIFY  BOTH  AND  ADD  TO 
INTERNAL  TABLE. 


ARGUMENTS : 


MOD- ID 

PARM-TABLE 

NEW-PARM-TABLE 

NO-OF-PARMS 

RET-STATUS 


DSPLY[X(10) ] 

RECRD 

RECRD 

DSPLY[S9 (9) ] 
DSPLY[X(5) ] 
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INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ROUTINES  CALLED: 


CPFNXT 

UERROR 

VERDT 


DOCGROUP  PS41100  Module  Documentation 
NAME:  ADDSTD 

PURPOSE:  ADD  STANDARD  DATA  TYPES  TO  CDM  DB. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ADDSTD 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


THIS  ROUTINE  ADDS  THE''STD''  DATA  TYPE 
FOR  A  DOMAIN 
CLASS. 

MODIFIED  8/28/89  TO  HANDLE  THE  V,D,  AND  M  STANDARD  DATA  TYPES 
VERIFY  THAT  THE  DATA  TYPE  IS  DEFINED  AS 
••STD",  THEN  MAKE  SURE  THAT  THE  DATA-TYPE 
NAME  TO  BE  ADDED  DOES  NOT  PREVIOUSLY 
EXIST.  NOW  CHECK  IF  IT  IS  A  LEGAL  TYPE 
AND  HAS  CORRECT  DECIMAL  SPECIFICATIONS. 

NOW  INSERT  THE  DATA  TYPE. 

ARGUMENTS : 


DOM-NO 

DOM-NAME 

DATA-TYPE-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

RETURN-STATUS 


DSPLY[S9(9) ] 
DSPLY[X(30)  ] 
DSPLY[X(30)  ] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


ROUTINES  CALLED: 


VERSDT 

UERROR 

VERDT 

CRTVLRG 

INSDT 

CRTVMOD 
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DOCGROUP  PS41100  Module  Documentation 
NAME;  ADDUNIN 

PURPOSE;  ADD  ENTITIES  TO  DEFINE  RECORD  UNION. 

LANGUAGE;  VAX-11  COBOL 

SOURCE  FILE;  ADDUNIN 

SOURCE  FILE  TYPE;  COB 

HOST; 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 

DESCRIPTION: 


-  VERIFY  ENTITIES  AND  DATA  FIELDS  AND  ADD 
TO  RECORD  UNION. 


DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[S9(9)  ] 
DSPLY[X(5)  ] 
DSPLY[S9 (9)  ] 


CHKCDM 

LISTNOS 

ROUTINES  CALLED: 


CPFONE 

UERROR 

VERECN 

CPFVAL 

CPFNXT 

VERDFID 

VERUNIN 

VERUDT 

INSUNIN 


ARGUMENTS : 


DB-NAME 

RT-ID 

DB-ID 

FUNC-TYPE 

RT-NO 

INCLUDE  FILES; 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  ADPARMl 

PURPOSE:  CREATES  78  CHAR  NDDL  COMMANDS  WITH  PARAMETERS  AND 
DELIMITERS 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ADPARMl 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


Writes  a  command  line  if: 

1)  routine  is  called  with  delimiter  =  semicolon 
(end  of  command  -  next  line  not  indented) 

2)  parameter  will  not  fit  on  current  command  line 
(next  line  indented) 

3)  routine  is  called  with  parameter  and  delimiter  both  blank 

4)  routine  is  called  with  delimiter  =  period 
(erd  of  line  -  next  line  not  indented,  delimiter 
changed  to  space) 

5)  routine  is  called  with  delimiter  =  pound  sign 
(end  of  line  -  next  line  indented,  delimiter  changed 
to  space) 

Note:  April  '87  -  Delimiter  is  always  appended  to  the  text 
being  added  to  the  command  line.  This  was  originally  done  to 
accommodate  both  blanks  and  commas  as  delimiters. 

For  rel  2.3,  code  was  added  to  recognize  the  pound  sign  (#) 
delimiter. 

Note:  This  routine  is  merely  a  copy  of  "ADDPARM" .  The 

purpose  of  the  copy  is  to  allow  multiple  commands 
to  be  be  constructed  at  the  same  time. 


ARGUMENTS : 


DSPLY[X(60) ] 
DSPLY[X3 


WRTLIN 


TEXT-PARM 

DELIMTR 

ROUTINES  CALLED: 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  ALGCHK 

PURPOSE:  CHECK  THE  LEGALITY  OF  A  COMPLEX  MAPPING  ALGORITHM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALGCHK 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


VALIDATE  IF  THE  ALGORITHM  CONFORMS  WITH  THE 
RULES  FOR  CS-IS  AND  ES-CS  MAPPINGS. 

VERIFY  THAT  THE  COMPLEX  MAPPING  ALGORITHM 
AGREES  WITH  THE  RULES  STATED  BELOW: 

FOR  ES-CS:  A  SINGLE  INPUT  DATAITEM 

A  SINGLE  OUTPUT  ATTRIBUTE 

FOR  CS-ES:  A  SINGLE  INPUT  ATTRIBUTE 

A  SINGLE  OUTPUT  DATAITEM 

FOR  CS-IS:  l:MANY  INPUT  ATTRIBUTES 

1:MANY  OUTPUT  DATAFIELDS  OR 

A  SINGLE  OUTPUT  RECORD 

FOR  IS-CS;  1:MANY  INPUT  DATAFIELDS  OR 

A  SINGLE  INPUT  RECORD 

1:MANY  OUTPUT  ATTRIBUTES 

ALSO, 

IF  ALGORITHM  SPECIFIED  FOR  SEARCH/UPDATE: 

THE  DATAFIELDS  MUST  EXIST  IN  THE  SAME  RECORD  AND 
THE  TAGS  MUST  EXIST  IN  THE  SAME  ENTITY 
IF  THE  ALGORITHM  SPECIFIED  FOR  RETRIEVE  : 

THE  DATAFIELDS  MUST  EXIST  IN  THE  SAME  RECORD 
IF  THE  ALGORITHM  TRANSFORMS  BETWEEN 
CS-IS,  THE  TAG  MAPPING  MUST  BE  INSERTED 
IN  AUC_IS_MAPPING. 

ARGUMENTS : 


CMP-TABLE  RECRD 

RET-STATUS  DSPLY [ X ( 5 ) ] 

INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ALGTBL 

ERRPRO 

ROUTINES  CALLED: 


VERRTNO 

VERENT 

VERALMP 

INSAISM 

UERROR 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  ALGDTN 

PURPOSE:  CHECK  COMPATIBILITY  OF  ALGORITHM  DATA  TYPES 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALGDTN 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


VALIDATE  COMPATIBILITY  OF  DATATYPES 
BETWEEN  THE  MODULES'  PARAMETERS  AND 
THOSE  OF  THE  ALGORITHM. 

12/18/89  -  ADDED  DATATYPE  OF  "H"  (FOR  OVERPUNCH)  AS  VALID 
INTERNAL  TYPE  FOR  CODASYL 

-  REMOVED  DATATYPE  OF  "R"  AS  VALID  INTERNAL  CODASYL 
DATATYPE 

ARGUMENTS : 


CMP-TABLE  RECRD 

RET-STATUS  DSPLY [ X ( 5 ) ] 

INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ALGTBL 

ERRPRO 

ROUTINES  CALLED: 


UERROR 

VERDTYP 

SELDBMS 

VALDTN 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  ALLDB 

PURPOSE:  SELECT  ALL  DATABASES  FROM  DATA_BASE  AND  LOAD  TABLE 
FOR  EACH 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALLDB 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


ARGUMENTS : 


DB-TABLE 

DESC-FLAG 

INCLUDE  FILES: 


RECRD 

DSPLYtX] 


ERRCDM 

SRVRET 

DBTBL 

ERRPRO 

ROUTINES  CALLED: 


GENDB 

ERRPRO 


DOCGROUP  PS41100  Module  Documentation 
NAME:  ALLDBMS 

PURPOSE:  COPY  ALL  DBMS  AND  ASSOCIATED  HOSTS  IN  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLDBMS 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


CALLED  FROM  CPYDBMS  THIS  ROUTINE  WILL 

GENERATE  A  NDDL  'DEFINE  DBMS'  COMMAND  FOR  EACH  DBMS. 

THEN  CALLS  "SELHOST"  TO  DETERMINE 

IF  ANY  ASSOCIATION  WITH  THE  HOST  ID  IS  FOUND  IN 

THE  DBMS  ON  HOST  TABLE. 
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ARGUMENTS : 


DSPLy[X] 
DSPLY[X] 

INCLUDE  FILES: 


ERRCDM 

ERRPRO 

ROUTINES  CALLED: 


ADDPARM 

SELHOST 

UERROR 

SELDB 

ERRPRO 


DESC-FLAG 

DB-FLAG 


DOCGROUP  PS41100  Module  Documentation 
NAME:  ALLDOM 

PURPOSE:  SELECT  ALL  DOMAINS  FROM  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLEXJM 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  SELECT  DOMAIN  NUMBER  AND  NAME  OF  ALL  DOMAINS 
IN  THE  CDM.  FOR  EACH  DOMAIN  RETURNED 
CALL  "GENDOM"  TO  GENERATE  THE  "CREATE  DOMAIN" 
NDDL  COMMAND. 

ARGUMENTS : 


DESC-FLAG  DSPLY[X] 

USER-FLAG  DSPLY[X] 

NCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 

ROUTINES  CALLED: 


GENDOM 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ALLOT 

PURPOSE;  SELECT  ALL  DATATYPES  FOR  A  DOMAIN  FROM  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLOT 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  SELECT  ALL  META  DATA  FOR  EITHER  THE  STANDARD 
OR  USER  DATA  TYPES  FOR  A  GIVEN  DOMAIN, 
DEPENDING  ON  THE  INPUT  PARAMETER  "TYPE-IND”. 
EITHER  GENERATE  THE  ''TYPE”  CLAUSE  OF  THE 
"CREATE  DOMAIN"  NDDL  COMMAND  OR  THE  "DESCRIBE" 
NDDL  COMMAND  FOR  THE  DATATYPE  DEPENDING  ON 
THE  INPUT  PARAMETER  "GEN-TYPE". 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

TYPE-IND 

GEN-TYPE 

RET-STATUS 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[X(4) ] 
DSPLY[XXX] 
DSPLY[X(5) ] 


INCLUDE  FILES; 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


GENDESC 

GENDT 

ERRPRO 


3-423 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 
NAME  i  ALIiECRT 

PURPOSE;  SELECT  ALL  ENTITY  NUMBERS  AND  NAMES  IN  CDM  AND  START 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLECRT 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION; 


-  Select  all  entity  numbers  and  names  in 
the  cdm  and  for  each  one  selected  call 
genecrt  to  start  generating  entity  to 
record  mappings. 


INCLUDE  FILES: 


ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


GENECRT 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME;  ALLKEY 

PURPOSE:  GENERATES  KEY  CLASS  FOR  AN  ENTITY 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLKEY 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  THE  SHELL  ROUTINE 
FOR  AN  ENTITY. 


TO  GENERATE  THE  KEY  CLASS 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[S9 (9) ] 
RECRD 


ARGUMENTS : 


DEP-EC-NO 

DEP-EC-NAME 

RC-NO 

RC-DEPKC-LIST 


INCLUDE  FILES: 


KEYLIST 

ECLIST 

RCDEPKC 

ERRPRO 


ROUTINES  CALLED: 


CHKOWN 

GENALTl 

CHKINH 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME;  ALLMENT 

PURPOSE:  SELECT  ALL  ENTITIES  IN  CDM  AND  START  GENERATING 
CREATE  MAPS  FOR  EACH 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALLMENT 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  Select  all  entities  in  the  cdm  and  for  each  one 
selected  call  genment  to  start  generating  create 
map  commands. 


ARGUMENTS ; 

PART-FLAG 

DSPLY[X] 

UNION-FLAG 

DSPLY[X] 

MOD-TABLE 

RECRD 

UNION-TABLE 

RECRD 

INCLUDE  FILES: 

ERRCDM 

SRVRET 

MDTBL 

UNTBL 

ERRPRO 

ROUTINES  CALLED; 

GENMENT 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ALLMREC 

PURPOSE:  SELECTS  ALL  DATABASE/RECORD  MAPS  TO  BE  COPIED 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLMREC 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ARGUMENTS : 

PART-FLAG 

DSPLY[X] 

UNION-FLAG 

DSPLY[X] 

MOD-TABLE 

RECRD 

HP-TABLE 

RECRD 

INCLUDE  FILES: 

ERRCDM 

SRVRET 

MDTBL 

HPTBL 

ERRPRO 

ROUTINES  CALLED: 

GENMAP 

GENCRPT 

GENCRUN 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME;  ALLMROJ 

PURPOSE:  GENERATE  CREATE  MAP  COMMANDS  FOR  RECORD  OUTER  JOIN 

LANGUAGE;  VAX- 11  COBOL 

SOURCE  FILE:  ALLMROJ 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION; 


INCLUDE  FILES: 


ERRCDM 

ADDPARM 

ERRPRO 


ROUTINES  CALLED: 


SELECNM 

ADDPARM 

SELDBRT 

UERROR 

ERRPRO 


3-428 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  ALLREC 

PURPOSE;  SELECT  ALL  RECORDS  OF  A  DB  AND  CALL  GENREC  FOR  EACH 
RECORD  SELECTED 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALLREC 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  will  select  all  records  associated 
with  a  particular  database.  It  is  called  by  CPYREC 
and  CPYDB  (copy  database) .  For  each  record  selected 
it  calls  GENREC  tpo  generate  DEFINE  RECORD  commands 


ARGUMENTS : 


DB-ID 
DBMS -NAME 
DESC-FLAG 


DSPLY[S9 (9) 3 
DSPLY[X(30)  3 
DSPLY[X3 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED; 


GENREC 

ERRPRO 
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NAME:  ALLREL 

PURPOSE:  ALLREL:  FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL 
GENERATE 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALLREL 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ARGUMENTS : 


MODEL-NO 

MODEL-NAME 

KEYWORD-FLAG 

DESC-FLAG 

RC-DEPKC-LIST 

RETURN-STATUS 


DSPLY[S9(9) ] 
DSPLY[X(30)  ] 
DSPLY[9] 
DSPLY [ 9 ] 
RECRD 

DSPLY[9(9) ] 


INCLUDE  FILES: 


ERRCDM 

EOD 

DEPECL 

RCDEPKC 

ERRPRO 

ROUTINES  CALLED: 


BLRCKC 

MODRELA 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ALLRNG 

PURPOSE:  SELECT  ALL  RANGES  OF  A  DOMAIN 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLRNG 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  SELECT  THE  RANGES  FOR  A  DOMAIN  AND 
GENERATE  THE  "RANGE"  CLAUSE  OF  THE 
"CREATE  DOMAIN"  NDDL  STATEMENT 


ARGUMENTS : 


DOM-NO  DSPLY [ S9 ( 9 ) ] 

RET-STATUS  DSPLY [ X ( 5 ) ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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DOCGROUP  PS 4 1100  Module  Documentation 


NAME:  ALLSET 

PURPOSE:  SELECT  ALL  SETS  FROM  THE  CDM  FOR  A  Db-ID 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLSET 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  SELECT  META  DATA  OF  ALL  SETS  FOR  A  SPECIFIED 
DATA  BASE  IN  THE  CDM.  FOR  EACH  SET  RETURNED 
CALL  "GENSET”  TO  GENERATE  THE  “DEFINE  SET" 

NDDL  COMMAND. 


ARGUMENTS : 


DB-ID 
DBMS -NAME 
DB-NAME 
DESC-FLAG 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[X(30)  ] 
DSPLY[X] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


GENSET 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  ALLVALU 

PURPOSE:  SELECT  ALL  VALUES  OF  A  DOMAIN 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLVALU 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  SELECT  THE  VALUES  FOR  A  DOMAIN  AND 
GENERATE  THE  "VALUE"  CLAUSE  OF  THE 
"CREATE  DOMAIN"  NDDL  STATEMENT 


ARGUMENTS : 


DOM-NO  DSPLY [ S9 ( 9 ) ] 

RET-STATUS  DSPLY [ X ( 5 ) ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  ALLVIEW 

PURPOSE:  CREATE  AN  ES-CS-MAPPING  FOR  AUC  TO  DATA  ITEM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALLVIEW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ALLVIEW  CREATES  THE  ES  TO  CS  MAPPING 
WHEN  THE  USER  WISHES  TO  MAP  EACH 
ATTRIBUTE  USE  CLASS  OF 

AN  ENTITY  CLASS  TO  DATA  ITEMS  IN  THE  VIEW.  DATA 
ITEM  ARE  STORED  USING  THE  SAME  NAME  AS  THE  TAG 
(ATTRIBUTE  USE  CLASS) . 

EXECUTE  AN  NDML  SELECT  TO  RETRIEVE  ALL 
THE  ATTRIBUTE  USE  CLASSES  FOR  AN  ENTITY 
CLASS.  FOR  EACH  AUC  RETRIEVED,  GET 
THE  DATA-TYPE-NAME  FOR  THE  DOMAIN,  THEN 
CREATE  A  NEW  DATA_ITEM  AND  PROJECT_DATA_ITEM 
OCCURRENCE . 


ARGUMENTS : 


VIEW-NO 

EC-NO 

RET-STATUS 


DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


SRVRET 

UNIQENO 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


VERSDT 

UERROR 

GETNNUM 

INSDI 

INSPDI 

ERRPRO 
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NAME:  ALMROJC 

PURPOSE:  GENERATE  CREATE  MAP  COMMANDS  FOR  RECORD  OUTER  JOIN 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALMROJC 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


INCLUDE  FILES; 


ERRCDM 

ADDPARM 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

SELDBRT 

UERROR 

ERRPRO 
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NAME:  ALTIERT 

PURPOSE:  DELETE  A  SPECIFIED  ENTITY  TO  RECORD  MAPPING 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTIERT 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  ONE  ROW  FROM  EC_RT_MAPPING 
FOR  A  GIVEN  EC_NO  AND  RT_NO  PROVIDED 
NO  OTHER  MAPPING  IS  DEPENDENT  ON  IT 
(I.E.  AUC_IS_MAPPING  AND/OR  ECRTUD) 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ARGUMENTS : 


EC-NO 

RT-NO 

RET-STATUS 


ROUTINES  CALLED: 


UERROR 

ERRPRO 
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NAME:  ALTAISM 

PURPOSE:  PROGRAM  NAME  ALTAISM 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTAISM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CHANGE  AN  AUC  MAPPING  PREFERENCE 
IN  THE  CDM. 


ARGUMENTS : 


TAG -NO 
PREFl-NO 
PREF2-NO 
RET-STATUS 


DSPLYtS9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


ERRCDM 

CHKCDM 

ERRPRO 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  ALTALI 

PURPOSE:  CONTROLS  ALTER  ALIAS  PROCESSING  (ALIAS  TO  PRIM  OR 
VICE  VERSA) 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTALI 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHANGES  THE  NAME_TYPE  FROM  'ALIAS'  TO 
'PRIMARY'  AND  FROM  'PRIMARY'  TO  ALIAS 
FOR  AN  ENTITY  OR  ATTRIBUTE. 

DEPENDING  ON  WHETHER  THE  OBJECT 
TYPE  IS  AN  ENTITY  OR  ATTRIBUTE, 

THIS  VERIFIES  THE  EXISTENCE  OF 
THE  OBJECT. 

THE  PRIM-NAME-TYPE 
FOR  THE  OBJECT-ID  WILL  BECOME 
'ALIAS'.  THE  ALIAS -NAME -TYPE 
FOR  THE  ALIAS -ID  WILL  BECOME  'PRIMARY'. 


ARGUMENTS : 

MODEL-NO  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES: 
LISTNOS 


ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERNME 

UERROR 

VERNMA 

CPFNXT 

UPDECAL 

UPDACAL 
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NAME:  ALTCARD 

PURPOSE:  PROCESS  CARDINALITY  FO  USER  SPECIFIED  RELATION 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTCARD 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ALTCARD  OBTAINS  THE  USER-SPECIFIED  CARDINALTY 
(IF  ANY)  FOR  THE  RELATION  FROM  THE  LISTS, 
VERIFIES  IT  AND  TRANSFERS  IT  TO  NUMERIC 
VARIABLES  WHICH  ARE  RETURNED  TO  THE  CALLING 
ROUTINE. 


ARGUMENTS : 


NO-IND-ENT 

MIN-NO-DEP-ENT 

MAX-NO-DEP-ENT 

RTN-STATUS 


INCLUDE  FILES: 


LISTNOS 


ROUTINES  CALLED: 


CPFONE 

LOWUPP 

UWARN 

CPFNXT 

UERROR 


DSPLY[S9 (9)  ] 
DSPLY[S9 (9)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9) ] 
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NAME;  ALTCAT 

PURPOSE;  CONTROLS  PROCESSING  LOGIC  FOR  THE  ALTER  CATEGORY 
RELATION  COMMAND 
LANGUAGE;  VAX- 11  COBOL 
SOURCE  FILE;  ALTCAT 
SOURCE  FILE  TYPE;  COB 
HOST; 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION; 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  ALTER  CATEGORY 
RELATION  COMMAND. 


DSPLY[S9(9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES; 


LISTNOS 

CHKMODL 


ARGUMENTS ; 


MODEL-NO 
RTN- STATUS 


ROUTINES  CALLED; 


UERROR 

CPFONE 

CPFNXT 

VERENT 

VERCR 

UPDTCR 

ADDKW 

DRPKW 

SELCATC 

SELCATM 

DELMTKC 

SELCRAD 

VERVAL 

VERCMU 

VERCMSV 

INSCATM 

ADDMIGC 

VERRCC 

DELCIA 

DELCMl 

DELCR 

DELRC 
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NAME;  ALTCODL 

PURPOSE:  PROCESSES  THE  DBMS'S  VAX-11  IDMS  IDS-II  FOR  ALTER  DB 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTCODL 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


PROCESSES  THE  DBMS'S  :  VAX-11,  IDS-II,  AND  IDMS  FOR 
ALTERING  THE  DATA  BASE  DEFINITION. 

Obtain  the  schema  and  subschema  name  if  any  and  update  the 
db  id,  schema,  and  subschema  in  CDM.  Obtain  the  data  base 
location  if  any  and  update  the  CDM.  For  each  area  to  be  added 
after  the  area  has  been  verified  as  not  existed  insert  the  db 
id 

and  area  name  in  the  CDM.  Repeat  for  all  areas  to  be  added.  For 
each  area  to  be  droppped  after  the  area  has  been  verified  as 
existing,  delete  the  db  id  and  area  name  from  the  CDM. 


ARGUMENTS : 


DB-ID 

RETURN-STATUS 


DSPLY[S9 (9) ] 
DSPLY[S9 (9)  ] 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

CPFNXT 

MODSCH 

UERROR 

MODLOC 

VERARL 

VERAREA 

I NS AREA 

DELAREA 

ERRPRO 
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NAME:  ALTDB 

PURPOSE:  CONTROLLING  MODULE  FOR  ALTERING  A  DATABASE 
DEFINITION. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  ALTDB 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

_  7 


EXTRACT  THE  DATA  BASE  NAME  FROM  THE  PARSER  LIST.  EXTRACT 
THE  HOST  ID,  NUL  VALUE,  AND  NTM  DIRECTORY  FROM  LISTS  IF 
IF  THEY  ARE  THERE. 

AFTER  VERIFYING  THAT  THE  DATA  BASE  EXISTS  MODIFY  THE  HOST, 
NULL  VALUE,  NTM  DIRECTORY  OR  ALL  3  FOR  THE  NAMED  DATA  BASE. 
PROCESS  THE  DBMS  NAME  DEPENDING  ON  WHETHER  IT  IS  TOTAL,  IMS, 
ORACLE,  IDS-II,  IDMS,  OR  VAX-11. 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

UNIQENO 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERDBAL 

UERROR 

VERHST 

MODDBAL 

ALTCODL 

ALTORCL 

ALT I MS 

CHGLOBL 

UWARN 

ERRPRO 
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NAME:  ALTDBMS 

PURPOSE:  ADD  OR  DROP  HOST  ASSOCIATED  WITH  DBMS  OR  CHANGE  MODEL 
TYPE  OF  DBMS 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTDBMS 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


:-  ALLOWS  USER  TO  ADD  AND  DELETE  HOST 
ASSOCIATIONS  WITH  A  DBMS.  ALSO  ALLOWS 
THE  DBMS  MODEL  TYPE  TO  BE  CHANGED. 
ALTDBMS  SETS  UP  AND  CALLS  INSDBH  TO 
INSERT  HOST  /  DBMS  ASSOCIATION  IN  THE 
DBMS_ON_HOST  TABLE.  THEN  SETS  UP  AND 
CALLS  DELDBH  TO  DELETE  HOST  /  DBMS 
ASSOCIATION  IN  THE  DBMS_ON_HOST  TABLE. 
VERDBMS  AND  VERHST  ARE  CALLED  TO  VERIFY 
THAT  THE  HOST  AND  DBMS  ARE  DEFINED. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

UERROR 

VERDBMS 

UWARN 

ALTDBT 

VERHST 

INSDBH 

CPFNXT 

VERDBH 

DELDBH 

ERRPRO 
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NAME:  ALTDBT 

PURPOSE:  PRODUCES  AN  NDML  STATEMENT  TO  CHANGE  THE  DB  MODEL  IN 
THE  DBMS  TABLE. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTDBT 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  PRODUCES  A  MODIFY  NDML  STATEMENT  TO 
CHANGE  THE  DB  MODEL  IN  THE  DBMS  TABLE. 


ARGUMENTS : 


DBMS -NAME 

DB-MODEL 

RET-STATUS 


DSPLY[X(30) ] 
DSPLYtX] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 
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NAME:  ALTDOM 
PURPOSE:  ALTER  A  DOMAIN 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTDOM 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THE  ALTER  DOMAIN  COMMAND  OBTAINS  A  DOMAIN  NAME, 
THEN  CALLS  THE  CLAUSE  PROCESSORS  TO  DROP  DATA 
TYPES  ADD  DATA  TYPES  AND  ALTER  DATA  TYPES. 

FIRST  OBTAIN  DOMAIN  NAME  AND  VERIFY  THAT 
IT  DOES  EXIST.  USING  THE  DOMAIN  NUMBER 
DROP,  ADD  AND  ALTER  DATA  TYPE. 


INCLUDE  FILES: 
LISTNOS 


ROUTINES  CALLED: 


CPFONE 

VERDOM 

UERROR 

PROCDT 

ALTVLRG 
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NAME:  ALTDT 

PURPOSE:  ALTER  DATA  TYPES 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTDT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  CLAUSE  WILL  ALTER  THE  DATA  TYPE  GIVEN  THE 
DOMAIN  NUMBER 

MODIFIED  8/9/89  LOGIC  WAS  ADDED  TO  HANDLE  THE  NEW  DATA  TYPES 
(V,D,M) 

GIVEN  THE  DOMAIN  NUMBER,  EXTRACT  THE 
DATA  TYPE  NAME,  ID,  TYPE-SIZE  FOR  A  DATA 
TYPE.  VERIFY  IF  IT  IS  STANDARD  OR  USER 
DEFINED  TYPE  AND  THAT  THE  TYPE  EXISTS. 

IF  IT  DOES,  UPDATE  THE  DATA  TYPE,  AND 
FETCH  THE  NEXT  RECORD  TO  BE  UPDATED. 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

DATA-TYPE-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

STD-USER 


DSPLY[S9(9) ] 
DSPLYtX(30)  ] 
DSPLY[X{30)  ] 
DSPLY[X] 
DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[X(4) ] 


INCLUDE  FILES: 


ERRCDM 


ROUTINES  CALLED: 


VERDTD 

UERROR 

VERSDT 

UPJIND 

RETDT 

UPDTDT 
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NAME:  ALTENT 

PURPOSE:  CONTROL  PROCESSING  FOR  ALTER  ENTITY  CLASS  COMMAND. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTENT 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  ALTER 
ENTITY  CLASS  COMMAND.  THE  COMMAND  CONSISTS  OF 
AN  ENTITY  CLASS  NAME  FOLLOWED  BY  ONE  OR  MORE 
OPTIONAL  CLAUSES.  THE  CLAUSES  ARE  ADD  KEY  CLASS, 
ADD  OWNED  ATTRIBUTE  LIST,  ADD  KEYWORD,  DROP  KEY 
CLASS,  DROP  OWNED  ATTRIBUTE,  AND/OR  DROP  KEYWORD. 

AN  ERROR  VERIFYING  ENTITY  CLASS  CAUSES 
PROCESSING  TO  STOP.  OTHERWISE,  EACH 
CLAUSE  IS  PROCESSED,  REGARDLESS  OF  ERRORS 
WHICH  MAY  HAVE  OCCURRED  WHILE  PROCESSING 
A  PREVIOUS  CLAUSE. 


ARGUMENTS : 

MODEL-NO  DSPLY[S9(9)] 


INCLUDE  FILES: 


LISTNOS 

CHKMODL 

ROUTINES  CALLED: 


UERROR 

CPFONE 

VERENT 

DRPAC 

DRPKC 

ADDATT 

ADDKC 

DRPKW 

ADDKW 

ALTTAG 

ALTENTK 

DELMTKC 
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NAME;  ALTENTK 

PURPOSE:  DRIVER  MODULE  TO  ALTER  THE  KEY  INFORMATION 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE;  ALTENTK 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  IS  THE  DRIVER  MODULE  FOR  ALTERING 
THE  KEY  INFORMATION  FOR  THE  SPECIFIED 
ENTITY  OBTAINED  FROM  THE  NDDL  COMMAND 
ALTER  ENTITY. 

MODIFIED  5/10/89;  TO  HANDLE  KC-TYPE  CHANGES 

-  THIS  ROUTINE  WILL  OBTAIN  THE  KEY  CLASS  TO 
BE  ALTERED  AND  MAKE  THE  APROPRIATE  CALLS  TO 
EXTERNAL  ROUTINES  THE  WILL  DO  THE  ACTUAL 
ALTERATIONS . 


ARGUMENTS : 


EC-NO 

RET-STATUS 


DSPLY[S9(9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

VERKC 

UERROR 

VERKCTl 

VERKCT 

CHKCAT 

UPDKCT 

MODKCNM 

KEYADS 

ERRPRO 
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NAME:  ALTFLDS 

PURPOSE :  **************************************************** 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTFLDS 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


12/18/89  -  ADDED  "H”  (FOR  OVERPUNCHED)  TO  VALID  CODASYL 
DATATYPES . 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

UNIQENO 

DFTBL 

TDFTBL 

ERRPRO 


ROUTINES  CALLED: 


GETRDH 

UERROR 

VERRT 

RETRFLD 

CPFONE 

CONVCPF 

LOWUPP 

VERDTYP 

FLDSEMS 

UWARN 

GETNNUM 

INSTFLD 

MODYFLD 

DELFLDS 

ERRPRO 
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NAME:  ALTHST 

PURPOSE:  ADD  OR  DROP  DBMS  ASSOCIATIONS  WITH  A  HOST 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTHST 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


:-  ALLOWS  USER  TO  ADD  AND  DELETE  DBMS 
ASSOCIATIONS  WITH  A  HOST.  ALTHST 
SETS  UP  AND  CALLS  INSDBH  TO  INSERT 
DBMS  /  HOST  ASSOCIATION  IN  THE 
DBMS_ON_HOST  TABLE.  THEN  SETS  UP  AND 
CALLS  DELDBH  TO  DELETE  DBMS  /  HOST 
ASSOCIATION  IN  THE  DBMS_ON_HOST  TABLE. 
VERDBMS  AND  VERHST  ARE  CALLED  TO  VERIFY 
THAT  THE  DBMS  AND  HOST  ARE  DEFINED. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERHST 

UERROR 

VERDBMS 

INSDBH 

CPFNXT 

VERDBH 

DELDBH 

ERRPRO 
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NAME:  ALTIMS 

PURPOSE:  PROCESSES  DBMS:  IMS  FOR  ALTERING  A  DATABASE 
DEFINITION 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  ALTIMS 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


PROCESSES  THE  DBMS  :  IMS  FOR  THE  ALTERING  OF  AN 
IMS  DATABASE 

Obtain  the  psb  name,  psb  sequence  number,  and  key  feedback 
length  from  parser  lists  if  any.  Then  update  the  psb  name, 
psb  sequence  number,  and  key  feedback  length  for  the  specified 
data  base  name. 


ARGUMENTS : 


DB-ID  DSPLY[S9(9)] 

RETURN-STATUS  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

CPFNXT 

MODPCB 

UERROR 

ERRPRO 
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NAME:  ALTMAP 

PURPOSE:  PROGRAM  NAME  ALTMAP 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTMAP 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  ALTMAP  IS  THE  COMMAND  PROCESSOR  FOR  THE 
ALTER  MAP  COMMAND.  IT  VALIDATES  CERTAIN 
COMMON  PARAMETERS  AND  THEN  CALLS  SUBPROGRAMS 
DEPENDING  ON  WHETHER  THE  ALTER  ADD,  ALTER  DROP 
OR  ALTER  ALTER  FUNCTIONS  ARE  TO  BE  PERFORMED. 
IT  ALSO  ALLOWS  MAPPING  PREFERENCE  NUMBERS 
TO  BE  REASSIGNED  NEW  VALUES. 

MODIFIED  5/1/89:  TO  HANDLE  CATEGORY  RELATIONS 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERENT 

UERROR 

CPFNXT 

VERAUC 

VERCR 

VERROJ 

VERHZP 

CONVCPF 

SELAISM 

LOWUPP 

MODAISM 

VERRULE 

UPDRULE 

ALTA ISM 

VERLR 

ADDMAP 

DRPSMAP 

ALTSMAP 

VERAISM 

ERRPRO 
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NAME:  ALTMOD 

PURPOSE:  CONTROLS  PROCESSING  FOR  ALTER  MODEL  COMMANDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTMOD 

SOURCE  FILE  TYPE:  COB 

HOST  r 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THE  ALTER  MODEL  COMMAND  PROCESSOR  WILL  CONTROL 
THE  PROCESSING  LOGIC  OF  ALTERING  A  MODEL  WITH¬ 
IN  THE  SYSTEM. 


ARGUMENTS : 


CURRENT-MODEL-NO  DSPLY [ S9 ( 9 ) ] 

CUR-MOD-NAME  DSPLY [ X ( 3  0 ) ] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 


ROUTINES  CALLED: 


CPFONE 

VERMOD 

UERROR 

UPDMOD 

UWARN 
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NAME:  ALTORCL 

PURPOSE:  PROCESSES  THE  DBMS:  ORACLE  FOR  ALTERING  A  DATA  BASE 
DEFINITION 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTORCL 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  DBMS  ORACLE  FOR  THE 
ALTERING  OF  DATA  BASE  DEFINITION. 

Extract  the  password  from  the  parser  list  the  update  the 
db  id  and  the  oracle  password  In  the  CDM. 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 

ROUTINES  CALLED: 


CPFONF 

MODPWKD 

UERROR 

ERRPRO 


ARGUMENTS : 


DB-ID 

RETURN-STATUS 
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NAME:  ALTPART 

PURPOSE:  ALTER  A  HORIZONTAL  PARTITION  OF  AN  ENTITY 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTPART 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  ALTERS  A  HORIZONTAL  PARTITION  OF  AN  ENTITY 

EITHER  ADDING  OR  DROPPING  RECORD  TYPES  AT  USER'S  REQUEST 

-  VERIFIES  THAT  THE  PARTITION  AND 
ENTITY  EXISTS,  VERIFIES  THAT  RECORDS 
TO  BE  ADDED  DO  NOT  EXIST,  VERIFIES 
THAT  RECORDS  TO  BE  DROPPED  DO  EXIST, 

DROPS  OR  ADDS  RECORDS  AS  PER  USER 
REQUEST,  THEN  CHECKS  TO  BE  SURE 
THAT  AT  LEAST  2  DATA  BASE/RECORD 
TYPE  PARTITIONS  EXIST  ON  THE  CDM. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


HPNLOOK 

UERROR 

CPFONE 

VALDROP 

VERDBRT 

VERPART 

I NS PART 

CPFNXT 

VERHPN 

ERRPRO 


3-455 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME;  ALTPSB 

PURPOSE;  PROGRAM  NAME  ALTPSB 

LANGUAGE;  VAX-11  COBOL 

SOURCE  FILE;  ALTPSB 

SOURCE  FILE  TYPE;  COB 

HOST; 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  CHANGE  A  PSB  NAME  /  HOSTID 
ASSOCIATION  IN  THE  PSB  TABLE 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERPSB 

UERROR 

VERHST 

VERDBH 

UPDIPSB 

ERRPRO 
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NAME:  ALTREC 

PURPOSE;  CONTROLS  THE  PROCESSING  LOGIC  FOR  ALTERING  A  RECORD 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTREC 

SOURCE  FILE  TYPE;  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  ALTERING 
A  RECORD  BY  ADDING  OR  DROPPING  AREAS  AND/OR  FIELDS  OF  A 
RECORD  . 

AFTER  EXTRACTING  THE  DB-ID  AND  RT-ID,  VERIFY  THAT  THE  RECORD 
TYPE  DID  PREVIOUSLY  EXIST.  IF  IT  DID,  PROCESS  THE 
AREA  INFORMATION  AND  FIELD  INFORMATION. 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


GETRDH 

UERROR 

VERRT 

CPFONE 

LOWUPP 

CPFNXT 

VERDBAA 

DRPFLD 

ADDFLDS 

VERAREA 

INSDAA 

DELAAA 

ERRPRO 
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NAME:  ALTREL 

PURPOSE:  CONTROLS  PROCESSING  LOGIC  FOR  THE  ALTER  RELATION 
COMMAND 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTREL 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  ALTER 
RELATION  COMMAND. 

MODIFIED:  25-APR-89 

DROPPED  CALL  TO  VERREL  AND  ADD  IT  BACK  BY  ITS  PARTS 
CHANGES  REQUIRED  BECAUSE  OF  LINK  AND  CATEGORY  RELATIONS 


ARGUMENTS : 

MODEL-NO  DSPLY [ S9 ( 9 ) ] 

INCLUDE  FILES: 

LISTNOS 

CHKMODL 


ROUTINES  CALLED: 


UERROR 

CPFONE 

CPFNXT 

VERENT 

VERLR 

GETCARD 

ALTCARD 

UPDTRC 

ADDMIG 

ADDKW 

DRPMIG 

DRPKW 

DELMTKC 
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NAME:  ALTSMAP 
PURPOSE:  PROGRAM  ALTSMAP 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  ALTSMAP 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CALLED  FROM  ALTMAP,  THIS  PROGRAM  WILL 
CHANGE  THE  VALUES  FOR  AN  EXISTING  AUC 
TO  SET  MAPPING  IN  THE  CDM. 


DSPLY[S9(9) ] 
DSPLY[X] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ARGUMENTS : 


TAG-NO 

HZ-PART-FLAG 

PREF-NO 


ROUTINES  CALLED: 


VERAISM 

UERROR 

CPFNXT 

CPFVAL 

VERDB 

FNDASM 

VERSMS 

VERRT 

CHKAUCV 

UPDAUCS 

ERRPRO 


3-459 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  ALTSMOD 

PURPOSE:  ALTER  SOFTWARE  MODULE 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTSMOD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CHANGE  LANG-NAME  AND/OR  LATEST-REV- DATE 
IN  SOFTWARE_MODULE  TABLE.  ADD  OR  DROP 
ASSOCIATED  PARAMETERS  IN  MODULE_PARAMETER 
TABLE. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 


ROUTINES  CALLED: 


CPFONE 

VERSMOD 

UERROR 

UPDSMOD 

DRPARMS 

LOWUPP 

SELPARM 

PROCPRM 

DELPARM 

INSPARM 
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NAME:  ALTTAG 

PURPOSE:  RENAME  A  TAG  IN  AN  ENTITY  FROM  THE  ALTER  ENTITY  COM. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  ALTTAG 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  MODULE  WILL  RENAME  A  TAG  IN  AN  ENTITY 
SPECIFIED  IN  THE  NDDL  COMMAND  ALTER  ENTITY. 

-  THIS  ROUTINE  WILL  RENAME  THE  A  TAG  IN  AN 
ENTITY  AFTER  CHECKING  TO  SEE  THAT  THE 

TAG  EXISTS  AND  THAT  THE  NEW  TAG  DOES  NOT 
ALREADY  EXIST  IN  THE  ENTITY. 


DSPLY[S9 (9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

LISTNOS 

ERRPRO 


ARGUMENTS : 


EC-NO 

RET-STATUS 


ROUTINES  CALLED: 


CPFONE 

VERATAG 

MODAAUC 

UERROR 

CPFNXT 

ERRPRO 
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NAME:  ALTUNIN 

PURPOSE:  ALTER  RECORD  UNION. 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTUNIN 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  ALTER  A  RECORD  UNION  DEFINITION  BY 
DROPPING  AND  ADDING  ENTITIES. 


INCLUDE  FILES: 


CHKCDM 

LISTNOS 


ROUTINES  CALLED: 


DBLOOK 

CPFONE 

ADDUNIN 

SELURT 

UERROR 

VERECN 

SELUNIN 

DELUNIN 

CPFNXT 

DELIERT 

ECRTALL 

DRPRULE 
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NAME;  ALTVLRG 

PURPOSE:  ALTERS  THE  VALUES  AND  RANGES  FOR  A  SPECIFIC  DOMAIN 

LANGUAGE;  VAX-11  COBOL 

SOURCE  FILE;  ALTVLRG 

SOURCE  FILE  TYPE:  COB 

HOST  i 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  DROPS  ALL  VALUES  AND  RANGES  ASSOCIATED 
WITH  ANY  "DROP  VALUE"  OR  "DROP  RANGE" 

CLAUSE  OF  AN  "ALTER  DOMAIN"  COMMAND. 

THEN  ADDS  VALUES  AND  RANGES  ASSOCIATED 
WITH  ANY  "ADD  VALUE"  OR  "ADD  RANGE" 

AFTERWARDS,  ALL  VALUES  AND  RANGES 
ARE  RETRIEVED  FROM  THE  CDM  DATA  BASE 
AND  CHECKED  AGAINST  INFORMATION  ABOUT 
THE  STANDARD  DATA  TYPE  TO  MAKE  SURE 
THE  ALTERED  VALUES  AND  RANGES  STILL 
CONFORM  WITH  THIS  INFORMATION. 

MODIFIED  8/8/89  The  code  that  made  a  call  to  ALTVMOD, 
which  generated  the  verification  module, 
was  removed. 

ARGUMENTS : 


DOM-NO 

DOM-NAME 

STD-DT-CHANGED 

INCLUDE  FILES: 


CHKCDM 

ERRCDM 

LISTNOS 

ROUTINES  CALLED: 


CPFONE 

RETVALA 

UERROR 

UWARN 

DRPVALA 

VERVAL 

DRPVAL 

CPFNXT 

RETRNGA 

DRPRNGA 

VERRNG 

DRPRNG 

INSVAL 

INSRNG 

RETSTD 


DSPLY[S9 (9)  ] 
DSPLY[X(30)  ] 
DSPLY[X] 
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NAME:  ALTVMOD 

PURPOSE:  RECREATE  VERIFICATION  MODULE  FOR  DOMAIN  VALUES  & 
RANGES 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  ALTVMOD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  RECREATES  VERIFICATION  MODULE  FROM  VALUES 
AND  RANGES  UPDATED  IN  THE  "ALTER  DOMAIN" 
STATEMENT.  THE  VALUES  AND  RANGES  ARE 
RETRIEVED  FROM  THE  CDM  DATABASE 
AFTER  THEY  HAVE  BEEN  ALTERED. 

MODIFIED  MAR  16,  1988  TO  SUPPORT  FIOP'S 

ARGUMENTS : 


DOM-NO 

DOM-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

INCLUDE  FILES: 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 


LISTNOS 

CHKCDM 

ERRCDM 

MACDAT 

SBSTLST 

ERRFS 

ERRPRO 

ROUTINES  CALLED: 


CHKVAL 

UERROR 

CHKRNG 

RETVMOD 

VERFJCB 

UWARN 

INSSMO: 

INSVMOD 

VMODPRM 

DRPVMOD 

DELPARM 

DELSMOD 

CDMACRX 

OUTFIL 

CLSFIL 

ERRPRO 
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NAME:  AOACHK 

PURPOSE:  DETERMINE  CASES  WHERE  ATTRIBUTE  OWNERSHIP  CAN'T  BE 
ALTERED 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  AOACHK 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  AOACHK  DETERMINES  ALL  CASES  WHERE  AN 

ATTRIBUTE  OWNERSHIP  CANNOT  BE  ALTERED.  OWNERSHIP  MAY  NOT  BE 
ALTERED  WHERE: 

A)  A  DEPENDENCY  LOOP  OCCURS 

B)  IF  OLD  OWNER  ENTITY  MIGRATES  MULTIPLE  TIMES  TO  THE 
NEW  OWNER  ENTITY,  ONLY  ONE  OF  THESE  INHERITED 
ATTRIBUTES  MAY  BE  KEY  IN  THE  NEW  OWNER.  THE 

NDDL  PROCESSOR  DOES  NOT  KNOW  WHICH  KEY  MIGRATIONS 
TO  DROP  AND  WHICH  TO  RETAIN.  THE  MODELLER  IS 
REQUIRED  TO  MAKE  THIS  DECISION  BEFORE  ALTERING 
THE  ATTRIBUTE'S  OWNERSHIP. 

C)  IF  THE  MIGRATION  IS  THRU  A  CATEGORY,  CANNOT  ALTER  KEYS 
INVOLVING  CATEGORY  RELATIONS 

D)  IF  ATTRIBUTE  IS  A  DISCRIMINATOR  IN  A  CATEGORY, 

CANNOT  ALTER  OWNERSHIP 

ARGUMENTS : 


LINK-OLD-MIG-TO-NEW-COUNTER 

CAT-OLD-MIG-TO-NEW-COUNTER 

LINK-NEW-BACK-TO-OLD-COUNTER 

CAT-NEW-BACK-TO-OLD-COUNTER 

OLD-TAG-MIGRATION-TBL 

EC-NO-OLD 

EC-NO-NEW 

TAG-NO-OLD 

KEY-FOUND-IN-OLD-OWNER-FLAG 

ERROR-FLAG 


DSPLY[S9 (9) ] 
DSPLY[S9 (9)  ] 
DSPLY[S9 (9)  ] 
DSPLY[S9 (9)  ] 
RECRD 

DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[S9 (9) ] 
DSPLY[X] 
DSPLY[X] 


INCLUDE  FILES: 


CHKCDM 

Eia^CDM 

OLDTAGT 

ERRPRO 

ROUTINES  CALLED: 


UERROR 

AOACREC 

AOACTAG 

ERRPRO 
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NAME;  AOACOPR 

PURPOSE:  Coordinate  the  entity  processing  of  ownership  clause 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOACOPR 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  Coordinate  the  entity  processing  portion 
of  the  ownership  to  entity  clause. 

MODIFIED  6/26/89:  TO  HANDLE  CATEGORY  AND  LINK  RELATIONS 


ARGUMENTS ; 


MODEL-NO 

AC-NAME-OLD 

AC-NO-OLD 

EC-NO-NEW 

KEY-FOUND-IN-NEW-OWNER-FLAG 

KEY-FOUND-IN-OLD-OWNER-FLAG 

LINK-MIG-BACK-COUNTER 

CAT-MIG-BACK-COUNTER 

LINK-MIG-COUNTER 

CAT-MIG-COUNTER 

EC-NO-OLD 

TAG-NAME-OLD 

TAG-NO-OLD 

OLD-TAG-MIGRATION-TBL 

ERROR-FLAG 

RET-STATSS 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLYtS9(9)  ] 
DSPLY[S9(9)  ] 
DSPLYtS9(9)  ] 
DSPLY[S9 (9) ] 
DSPLYtX(30) ] 
DSPLY[S9 (9) ] 
RECRD 
DSPLY[X] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

LISTNOS 

OLDTAGT 

ERRPRO 


ROUTINES  CALLED; 


RETATTR 

VERKCM 

SELRELC 

SELRELL 

OLDTAGM 

AOACHK 

ERRPRO 
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NAME:  AOACREC 

PURPOSE:  SELECT  THE  CATEGORY  RELATION  NUMBER  THAT  AN  ENTITY  IS 
PART  OF 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  AOACREC 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  SELECTS  THE  CATEGORY  RELATION  NUMBER  THAT 
AN  ENTITY  IS  PART  OF  WHETHER  IT  BE  AS  THE  GENERIC 
OR  CATEGORY  MEMBER.  IF  RC-NO  IS  GREATER  THAN  ZERO 
THIS  MEANS  THAT  THE  OWNERSHIP  CLAUSE  IN  ALTER  ATTRIBUTE 
WILL  BE  INVALID. 


ARGUMENTS : 


EC-NO 

RC-COUNTER 

RTN-STATUS 


DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 

ROUTINES  CALLED: 


ERRPRO 
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NAME;  AOACTAG 

PURPOSE:  CHECKS  TO  SEE  IF  OLD  TAG  NO  IS  A  DISCRIMINATOR  FOR 
CATEGORY  RELAITON 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  AOACTAG 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


IF  OLD-TAG-NO  IS  A  DISCRIMINATOR  FOR  A  CATEGORY  RELATION 
THEN  ALTER  ATTRIBUTE  OWNERSHIP  CLAUSE  IS  INVALID. 


ARGUMENTS : 


TAG-NO-OLD 

RC-COUNTER 

RTN-STATUS 


DSPLY[S9 (9) ] 
DSPLY[S9 (9) ] 
DSPLY[S9  (9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 
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NAME:  AOADPM 

PURPOSE:  Determines  preservation  of  key  migrations. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOADPM 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  determines  whether  key 
migrations  need  to  be  preserved  and  preserves  them, 
else  if  there  is  no  relation  between  old  and  new  owner 
or  vice  versa,  all  migrations  of  the  old  owner  can  be 
deleted. 


ARGUMENTS : 


MI GRATES -COUNTER 

TAG-NO-OLD 

KC-NAME-LST 

KEY-FOUND-IN-NEW-OWNER 

OLD-TAG-MIGRATION-TBL 

EC-NO-NEW 

KC-NO-NEW 

KCM-TAG-NO 

MIGRATIONS-PRESERVED 

RET-STATUS 

INCLUDE  FILES: 


CHKCDM 

ERRCDM 

OLDTAGT 

ERRPRO 


ROUTINES  CALLED: 


DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
FLAG  DSPLYtX] 
RECRD 

DSPLY[S9(9)  ] 
DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[X] 
DSPLY[X(5) ] 


PRESMIG 

DELKCMT 

UWARN 

DELMIGK 

UERROR 

ERRPRO 
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NAME;  AOAEVAL 

PURPOSE:  Evaluates  attribute  ownership  clause 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOAEVAL 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  Evaluates  attribute  ownership  clause. 

MODIFIED  6/28/89:  TO  HANDLE  BOTH  CATEGORY  AND  LINK  RELATIONS 


ARGUMENTS : 


MODEL-NO 

AC-NAME-OLD 

AC-NO-OLD 

RETURN-STATUS 


DSPLY[S9 (9) ] 
DSPLY[X(30)  ] 
DSPLY[S9  (9)  ] 
DSPLY[S9  (9)  ] 


INCLUDE  FILES; 


CHKCDM 

ERRCDM 

LISTNOS 

KCNAMET 

NEWTAGT 

OLDTAGT 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

VERENT 

AOACOPR 

CPFCOR 

AOACREC 

UERROR 

AOAKC 

AOADPM 

AOAMGDP 

UPDAUCE 

AOAPICR 

INSKCM 

CPFNXT 

MODACEC 

DELMTKC 

UWARN 

ERRPRO 
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NAME:  AOAGAI 

PURPOSE:  Creates  attribute  use  and  inherited  use 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOAGAI 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  will  create  attribute_use_class 
and  inherited  attribute  use  class  occurences. 


ARGUMENTS : 


TAG-NAME-WS 

EC-NO-WS 

AC-NO-OLD 

KC-NO-NEW 

KCM-TAG-NO 

RC-NO-WS 

RET-STATUS 


DSPLY[X(30) ] 
DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLYtX(5)  ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

UNIQENO 

ERRPRO 

ROUTINES  CALLED: 


GETNNUM 
INSAUC 
U ERROR 
INSIAUC 
ERRPRO 


occurences 
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NAME:  AOAKC 

PURPOSE:  ESTABLISH  KEY  CLASS  FOR  NEW  OWNER  ENTITY 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOAKC 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  COM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  AOAKC  ESTABLISHES  THE  KEY  CLASS  FOR  THE 
NEW  OWNER  ENTITY.  IF  A  NEW  KEY  IS  SPECIFIED, 

INSERT  AN  OCCURANCE  IN  CDM  TABLE  KEY_CLASS.  IF  AN 
EXISTING  KEY  IS  SPECIFIED,  RETRIEVE  ALL  MIGRATIONS  TO 
EACH  OF  ITS  DEPENDENT  ENTITIES. 


ARGUMENTS : 


KC-NAME-LST 

KEY-PROCESSED-TBL 

EC-NO-NEW 

NEW-TAG-MIGRATION-TBL 

KC-NO-NEW 

ERROR-FLAG 

RET-STATUS 


DSPLY[X(30) ] 
RECRD 

DSPLY[S9(9) ] 
RECRD 

DSPLY[S9(9) ] 
DSPLY[X] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


UNIQENO 

CHKCDM 

ERRCDM 

KCNAMET 

NEWTAGT 

ERRPRO 


ROUTINES  CALLED: 


UERROR 

VERKC 

VERKCT 

GETNNUM 

INSKC 

NEWTAGM 

ERRPRO 
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NAME:  AOAMGDP 

PURPOSE:  Migrate  new  owner's  key  to  all  dependent  entities 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOAMGDP 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  Uses  the  table  NEW_TAG_MIGRATION_TBL, 
which  contains  migration  information  of  the  key  class 
specified  by  the  user  for  the  new  owner  entity,  create 
attribute  use  and  inherited  attribute  use  occurences  for  the 
attribute  whose  ownership  is  being  altered,  and  being 
placed  as  key  in  the  new  owner. 

ARGUMENTS : 


FIRST-TIME-FLAG 

RC-NAME-LST 

MIG-BACK-COUNTER 

EC-NO-OLD 

NEW-TAG-MIGRATION-TBL 

EC-NO-NEW 

KC-NO-NEW 

AC-NO-OLD 

TAG-NO-OLD 

TAG-NAME-OLD 

KCM-CREATED 

SUFFIX 

ERROR-FLAG 

KCM-TAG-NO 

RET-STATUS 


DSPLY[S9  (9) ] 
DSPLY[X(30) ] 
DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
RECRD 

DSPLY[S9(9) ] 
DSPLY[S9(9) 3 
DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[X(30) 3 
DSPLY[X] 
DSPLY[S99] 
DSPLY[X3 
DSPLY[S9(9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

UNIQENO 

NEWTAGT 

ERRPRO 


ROUTINES  CALLED: 


INSIAUC 

VERATAG 

AO AG A I 

INSKCM 

GETNNUM 

INSAUC 

UPDAUCE 

UERROR 

ERRPRO 
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NAME:  AOAPICR 

PURPOSE:  New  owner  entity's  new  key  migrates  back  to  old 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  AOAPICR 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  handles  the  case  where  the 
new  owner  entity's  new  key  can  migrate  back  to  the  old 
owner  entity.  Then  process  the  incomplete  relations. 
MODIFIED  7/18/89  :  CHANGED  CALL  TO  VERRC  TO  VERLR 

ARGUMENTS : 


RC-NAME-LST 

KC-NO-NEW 

TAG-NO-OLD 

EC-NO-NEW 

EC-NO-OLD 

KCM-TAG-NO 

TAG-NAME-OLD 

AC-NO-OLD 

FIRST-TIME-FLAG 

SUFFIX 

KCM-CREATED 

ERROR-FLAG 

RET-STATUS 


DSPLY[X(30) ] 
DSPLy[S9(9j ] 
DSPLY[S9 (9) ] 
DSPLY[S9 (9)  ] 
DSPLY[S9 (9) ] 
DSPLYtS9(9) ] 
DSPLY[X(30) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9) ] 
DSPLY[S99] 
DSPLYtX] 
DSPLYtX] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

UNIQENO 

ERRPRO 

ROUTINES  CALLED: 


VERLR 

VERIREL 

INSCRC 

GETNNUM 

INSAUC 

INSIAUC 

INSKCM 

VERATAG 

AO AG A I 

UERROR 

ERRPRO 
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NAME:  ATTKW 

PURPOSE:  CONTROLS  PROCESSING  TO  POPULATE  KEYWORD  TABLE  FOR  AUC 
KEYWORD 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  ATTKW 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  TO  POPULATE  A 
KEYWORD  TABLE  WITH  ATTRIBUTE  CLASS  KEi^WORDS  OF  ONE  MODEL, 
THEN  SEARCHES  THIS  TABLE  FOR  MATCHES  FROM  THE  SECOND  MODEL. 


ARGUMENTS : 


MOD-NOl 
M0D-N02 
MOD-NAME 1 
MOD-NAME2 


DSPLY[S9 (9)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[X(30)  ] 


INCLUDE  FILES: 


KWDTBL 

ERRPRO 


ROUTINES  CALLED: 


RETACKW 

RACKW2 

ERRPRO 
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NAME:  BLDATT 

PURPOSE:  CREATE  ATT  CLASS  AND  ATT  NAME  FOR  A  MODEL (CREATE/COPY 
ATT) 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  BLDATT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


BLDATT  CREATES  AN  ATTRIBUTE  CLASS  AND  ATTRIBUTE 
CLASS  NAME  OCCURENCE  FOR  A  MODEL.  BLDATT  IS 
USED  BY  BOTH  THE  CREATE  ATTRIBUTE  AND  THE  COPY 
ATTRIBUTE  COMMAND  PROCESSORS 


ARGUMENTS ; 


AC-NAME 

MODEL-NO 

DOM-NO 

NEW-AC-NO 


DSPLY[X(30) 3 
DSPLY[S9(9) 3 
DSPLY[S9 (9) 3 
DSPLY[S9 (9)  3 


INCLUDE  FILES: 
UNIQENO 


ROUTINES  CALLED: 


VERATT 

UERROR 

GETNNUM 

INSAC 
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NAME:  BLDATTl 

PURPOSE:  CREATES  AN  ATTRIBUTE  AND  ITS  KEYWORDS,  ALIAS  AND 
DESCRIPTIONS 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  BLDATTl 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


BLDATT  CREATES  AN  ATTRIBUTE  CLASS  AND  ATTRIBUTE 
CLASS  NAME  OCCURENCE  FOR  A  MODEL. 

ALSO  COPIES  ITS  ALIASES,  DESCRIPTIONS  AND 
KEYWORDS  UNLESS  EXCEPTED. 


ARGUMENTS : 


AC-NAME 

MODEL-NO 

OLD-AC-NO 

DOM-NO 

NEW-AC-NO 

KW-FLAG 

ALIAS-FLAG 

DESC-FLAG 


DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLYtS9(9)  ] 
DSPLY [ 9 ] 
DSPLY[9] 
DSPLY [ 9  ] 


INCLUDE  FILES: 


UNIQENO 

ROUTINES  CALLED: 


VERATT 

UWARN 

GETNNUM 

UERROR 

INSAC 

INSACNM 

WRTALI 

WRTACKW 

WRTDESC 
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NAME:  BLDRCEC 

PURPOSE:  RETREIVE  ALL  SUB-ENTITIES  OF  A  STRUCTURE  INTO  A  TABLE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  BLDRCEC 

SOURCE  FILE  TYPE:  PCO 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


THIS  ROUTINE  ASSUMES  THE  RDL-DEPKC-TABLE  HAS 
BEEN  INITIALIZED. 

ALL  THE  ENTITIES  BELONGING  IN  THE  STRUCTURE 
ARE  RETRIEVED  INTO  THE  TABLE. 

-  REPLACE  ORACLE  STRUCTURED  TREE  QUERY  WITH 
ITERATIVE  FETCH  PROCESS  FOLLOWED  BY  A  SORT  INTO 
HIERARCHICAL  ORDER.  ALTHOUGH  FOR  THE  GE  REHOST 
TO  INGRES,  IT  MAKES  THE  ROUTINE  SQL-STANDARD. 

ARGUMENTS : 


FROM-EC-NO 

RC-DEPKC-LIST 

DEP-EC-LIST 

RET-STATUS 


DSPLY[S9(9) ] 

RECRD 

RECRD 

DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

EOD 

RCDEPKC 

DEPECL 

ERRPRO 


ROUTINES  CALLED: 


FNDRCIE 

UERROR 

SQLSCA 

SQLBSl 

SQLSCH 

SQLSCC 

SQLTOC 

SQLOSQ 

SQLADR 

SQLABl 

SQLEXE 

SQLCLS 

SQLADl 

SQLFCH 

FNDEC 

ERRPRO 


3-478 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  BLKCLl 

PURPOSE:  STORE  ALL  KEY  CLASS  INFO  FOR  AN  ENTITY  IN  A  LIST 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  BLKCLl 

SOURCE  FILE  TYPE:  PRC 

HOST  • 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CREATES  A  KEY-CLASS-LIST  TABLE  CONTAINING  THE 
KEY  CLASS  NUMBERS.  KEY  CLASS  NAMES,  KEY  CLASS  MEMBER  TAG 
NUMBER  AND  TAG  NAMES  FOR  A  GIVEN  ENTITY. 


DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 


INCLUDE  FILES; 


SRVRET 

ERRPRO 


ARGUMENTS ; 


MOD-NO 

EC-NO 


ROUTINES  CALLED: 


AKCROW 

ERRPRO 
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NAME:  BLKCLST 

PURPOSE:  SELECT  AND  STORE  KEY  CLASS  INFO  FOR  A  GIVEN  ENTITY 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  BLKCLST 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


SELECTS  THE  KEY  CLASSES  AND  KEY  CLASS  MEMBERS  FOR  EACH  ENTITY 
IN  THE  FROM-MODEL  AND  CALLS  A  ROUTINE  TO  BUILD  THE  UNBOUNDED 
KEY-CLASS-LIST  STRUCTURE. 


ARGUMENTS : 


FROM-MOD-NO  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


AKCROW 

ERRPRO 
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NAME:  BLRCKC 

PURPOSE:  POPULATE  THE  RC~DEPKC-LIST  TABLE 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  BLRCKC 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL  FIND 
THE  KEY  CLASSES  FOR  THE  DEPENDENT  ENTITY  WHICH 
CONTAIN  ATTRIBUTES  INHERITED  VIA  THE  RELATION 
AND  CALL  ROUTINES  TO  POPULATE  THE  RC-DEPKC-LIST 
TABLE 

MODIFIED  9/19/89:  TO  HANDLE  CATEGORY  RELATIONS  AND  NEW 
RC-DEPKC-LIST  TABLE 


ARGUMENTS : 


MODEL-NO  DSPLY [ S9 ( 9 ) ] 

MODEL-NAME  DSPLY [ X ( 3  0 ) ] 

RC-DEPKC-LIST 

DEP-EC-LIST 

RET-STATUS 


INCLUDE  FILES: 


KEYLIST 

ERRCDM 

RCDEPKC 

DEPECL 

ERRPRO 


ROUTINES  CALLED: 


INITRDL 

STARTBL 

SELIKEY 

ERRPRO 
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NAME:  BLRCKCl 

PURPOSE:  POPULATE  THE  RC-DEPKC-LIST  TABLE  BY  ADDING  ENTRIES, 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  BLRCKCl 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


FOR  EACH  LEVEL  OF  RELATIONS  IN  FROM-MODEL  FIND 
THE  KEY  CLASSES  FOR  THE  DEPENDENT  ENTITY  WHICH 
CONTAIN  ATTRIBUTES  INHERITED  VIA  THE  RELATION 
AND  CALL  ROUTINES  TO  POPULATE  THE  RC-DEPKC-LIST 
TABLE.  DISCARD  AN  ENTRY  IF  IT  DOES  NOT  BELONG. 

MODIFIED  7/24/89:  ADDED  LOGIC  TO  HANDLE  CATEGORIES  AS  WELL  AS 
LINKS 


ARGUMENTS : 


EC-NO  DSPLY[S9(9)] 

MODEL-NO  DSPLYtS9(9)] 


INCLUDE  FILES: 


KEYLIST 

ERRCDM 

RCDEPKC 

DEPECL 

ERRPRO 

ROUTINES  CALLED: 


INITRDL 

BLDRCEC 

KYSTRUC 

FNDEC 

SELIKEY 

ERRPRO 
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NAME:  BLVWLST 

PURPOSE:  BUILD  THE  VIEW  LISTS  NECESSARY  FOR  CREATE  VIEW 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  BLVWLST 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  THIS  ROUTINE  WILL  BUILD  THE  VIEW  LISTS  NECESSARY 
FOR  THE  CREATE  VIEW  COMMAND.  BLVWLST  EXTRACTS  INPUT  FROM  THE 
PARSER  USING  SYMBOL  AND  CHAIN  STRUCTURE  AND  LOADS  IT  IN  THE 
APPRO¬ 
PRIATE  TABLES. 

MODIFIED  9/6/89  TO  ALLOW  USE  OF  THE  LIKE  (''LK”)  OPERATOR 
MODIFIED  9/7/89  TO  ALLOW  THE  USE  OF  FULL  ENTITY  NAMES  IN 
THE  WHERE  CLAUSE 

ARGUMENTS : 


RECRD 
RECRD 
RECRD 
RECRD 
RECRD 

DSPLY[X(5) ] 

INCLUDE  FILES; 


CHKCDM 

LISTNOS 

ERRCDM 

ATTRNOS 

CSQCLST 

BOOLST 

VWFROM 

VWDI 

VWRETR 

ERRPRO 

ROUTINES  CALLED: 


GET_FIRST_SYMB 

VERENT 

GET_FRST_CHAIN 

GET_NEXT_SYMB 

LOWUPP 

CDTRNSX 

VERTAG 

GTDTTYP 

UERROR 

ERRPRO 


CS-QUAL-CRITERIA-LIST 

BOOLEAN-LIST 

VIEW-FROM-LIST 

VIEW-DATA-ITEM-LIST 

VIEW -RETRI EVE -LIST 

RET-STATUS 
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NAME:  CATFROM 

PURPOSE:  GENERATE  CREATE  CATEGORY,  DESCRIBE  COMMANDS  IN  THE 
TO-MODEL 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CATFROM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


THIS  ROUTINE  SELECTS  ALL  THE  RELATIONS  IN  WHICH  THE 
FROM-ENTITY  IS  A  CATEGORY  MEMBER.  IF  THE  SAME  ENTITY 
EXISTS  IN  THE  TO-MODEL  BUT  NOT  THE  RELATION,  THEN  A 
CREATE  CATEGORY  AND  DESCRIBE  COMMANDS  ARE  GENERATED 
FOR  THE  FROM-RELATION. 


ARGUMENTS : 


FROM-EC-NO 

TO-EC-NO 

FROM-EC-NAME 

TO-EC-NAME 

TO-MOD-NO 

FROM-MOD-NO 

KW-FLAG 

DESC-FLAG 

COMBINE-TYPE 

RCNO-LIST 


DSPLY[S9 (9) ] 
DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLY [ 9 ] 
DSPLY [ 9  ] 
DSPLY [ 9 ] 
RECRD 


INCLUDE  FILES: 


SRVRET 

RELTBL 

ERRPRO 


ROUTINES  CALLED: 


SELECNM 

VERCR 

VERENT 

VERCRNM 

SELACNM 

GENCNME 

BLKCLl 

CMBRKW 

ADDPARM 

GENDESC 

ERRPRO 
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NAME:  CDNMOD 

PURPOSE:  DROP  ALL  REFERENCES  OF  NDML  MODULE  (AP) 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CDNMOD 

SOURCE  FILE  TYPE:  PCO 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  SHARE 


DESCRIPTION: 


USE  SQL  TO  DELETE  ALL  ROWS  FROM  THE  NDML  MODULE 
CDM  TABLE  FOR  A  USER  MODULE  BEING  RE-PRECOMPILED. 
REWRITTEN  FOR  RELEASE  2.3,  NEW  CDM  TABLES  AND  USE  SQL 


DSPLY[X(10) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

EOD 

ERRPRO 


ARGUMENTS : 


MOD-ID 

RET-STATUS 


ROUTINES  CALLED: 


SQLSCA 

SQLBSl 

SQLSCH 

SQLSCC 

SQLTFL 

SQLOPN 

SQLOSQ 

SQLADR 

SQLABl 

SQLEXE 

SQLWNR 

ERRPRO 
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NAME:  CDP4A 

PURPOSE:  VERIFY  USER  VIEW  STRUCTURE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CDP4A 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  THIS  ROUTINE  WILL  PERFORM  THE  NECESSARY 
LGORITHM  TO  VERIFY  A  LEGAL  USER  VIEW 
CLASS  STRUCTURE: 

1.  ALL  ENTITY  CLASSES  CONNECTED  BY  1-1  SETS  MUST 
BE  A  REGULAR  HIERARCHY 

2.  EACH  GROUPING  OF  1-1  STRUCTURES  CAN  BE  SUBSTITUTED 
AS  A  SINGLE  NODE 

3.  THE  RESULTING  STRUCTURE  OF  ALL  1-MANY  RELATIONSHIPS 
MUST  FORM  A  CONFLUENT  HIERARCHY 

ALL  INPUT  TO  THIS  ROUTINE  WILL  BE  SET  UP  IN  THE 
SEC-DECOMP-LIST  WHICH  CONTAINS  ALL  ENTITY  CLASSES  THAT 
ARE  RELATED  AND  THE  TYPE  OF  RELATIONSHIP. 

USING  A  POPULATED  SEC-DECOMP-LIST,  THIS  ROUTINE 
WILL  VALIDATE  A  VALID  SURROGATE  ENTITY  CLASS,  I.E. 

A  REGULAR-CONFLUENT  HIERARCHY 


ARGUMENTS : 


RECRD 

DSPLY[X(5) ] 

INCLUDE  FILES: 


ERRCDM 

SDLIST 

ERRPRO 


SEC-DECOMP-LIST 

RET-STATUS 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  CDTRNSX 

PURPOSE:  TRANSLATE  EXCLUSIVE  OR  (XOR)  AND  NOT  OPERATORS. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CDTRNSX 

SOURCE  FILE  TYPE:  COB 

HOST : 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  FUNCTION  WILL  TRANSLATE  THE  "XOR”  AND 
"NOT"  OPERATORS  IN  THE  WHERE  CLAUSE  OF  THE  NDML  STATEMENT. 
IT  WILL  UPDATE  BOTH  THE  ES-QUALIFY-LIST  AND  BOOLEAN-LIST 
TO  REFLECT  THE  TRANSLATION  OF  "XOR"  AND  "NOT"  TO  ALL  "AND" 
AND  "OR"  OPERATORS. 


ARGUMENTS : 


CS-QUAL-CRITERIA-LIST 

BOOLEAN-LIST 

RET -STATUS 


RECRD 
RE  CRD 

DSPLY[X(5) ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

CSQCLST 

BOOLST 

ERRPRO 

ROUTINES  CALLED: 


ERRPRO 
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NAME:  CERELS 

PURPOSE;  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL  ENTITIES  IN 
A  RELATION. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE;  CERELS 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 
ENTITIES  IN  A  RELATION. 


ARGUMENTS : 

FROM-MODEL-NO 

DSPLY[S9 (9) ] 

CUR-MODEL-NO 

DSPLY[S9(9) ] 

CUR-MODEL-NAME 

DSPLY[X(30) ] 

FROM-EC-NO 

DSPLY[S9 (9) ] 

TO-EC-NO 

DSPLY[S9 (9) ] 

FROM-EC-NAME 

DSPLY[X(30) ] 

TO-EC-NAME 

DSPLY[X(30) ] 

KW-FLAG 

DSPLY[9] 

ALIAS-FLAG 

DSPLY[9] 

DESC-FLAG 

DSPLY[9] 

FILE-NAME 

DSP  jY[X(30)  ] 

INCLUDE  FILES; 

RELTBL 

ERRPRO 

ROUTINES  CALLED: 

OPNFIL 

ADDPARM 

GENENTl 

UERROR 

BLKCLl 

DEPFRCM 

GENALTE 

INDFROM 

CLSFIL 

ERRPRO 
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NAME:  CESTRUC 

PURPOSE:  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL  ENTITIES 
FOR  THE  STRUCTURE 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CESTRUC 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  GENERATES  NDDL  COMMANDS  ON  A  FILE  FOR  ALL 
ENTITIES  FOR  THE  STRUCTURE. 


ARGUMENTS : 


FROM-MODEL-NO 

FROM-MODEL-NAME 

FROM-EC-NO 

TO-EC-NAME 

KW-FLAG 

ALIAS-FLAG 

DESC-FLAG 

FILE-NAME 

CUR-MODEL-NAME 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 
DSPLY[S9 (9)  ] 
DSPLY[X(30)  ] 
DSPLY[9] 
DSPLY[9] 
DSPLY[9] 
DSPLY[X(30) 1 
DSPLY[X(30) ] 


INCLUDE  FILES: 


RCDEPKC 

ERRPRO 

ROUTINES  CALLED: 


OPNFIL 

ADDPARM 

GENENTl 

BLKCLl 

GENALTE 

DEPATT 

DEPENT 

DPKCLST 

DEPREL 

CLSFIL 

ERRPRO 


3-489 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  CHKATT 

PURPOSE:  CHECK  IF  ATTRIBUTES  HAVE  BEEN  CREATED  ACCORDING  TO 
STANDARDS 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKATT 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CHECKS  TO  SEE  IF  THE  FOLLOWING  RULES  ARE 
FULFILLED: 

1)  EACH  ENTITY  MUST  HAVE  AT  LEAST  ONE  ATTRIBUTE  USE  CLASS 

2)  EACH  ATTRIBUTE  CLASS  MUST  HAVE  A  DOMAIN  AND  THAT  DOMAIN 
MUST  HAVE  A  STANDARD  DATA  TYPE. 


ARGUMENTS : 


EC-NO 

EC-NAME 

NDDL-STATUS 


DSPLY[S9(9) ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 

ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  CHKAUCV 

PURPOSE;  CHECK  EXISTENCE  OF  AN  UNIQUE  AUC  VALUE  FOR 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKAUCV 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHKAUCV  SEARCHES  ALL  AUC  TO  SET  MAPPINGS  FOR  A  PARTICULAR  AUC 
TO  DETERMINE  WHETHER  AN  AUC  VALUE  HAS  BEEi.  USED  MORE  THAN 
ONCE  FOR  A  SINGLE  PREFERENCE. 

IF  SO,  FOUND  SET  TO  1. 


ARGUMENTS : 

TAG -NO 

DSPLY[S9 (9) ] 

PREF-NO 

DSPLYtS9(9) ] 

IN-AUC-VALUE 

DSPLY[X(30) ] 

HZ-FLAG 

DSPLYfX] 

IN-RT-NO 

DSPLY[S9(9) ] 

IN-DB-ID 

DSPLY[S9(9) ] 

FOUND 

DSPLY[S9(9) ] 

INCLUDE  FILES; 

ERRCDM 

ERRPRO 

ROUTINES  CALLED: 

ERRPRO 
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NAME :  CHKCARD 

PURPOSE:  OBTAINS  THE  USER-SPECIFIED  CARDINALTY  (IF  ANY)  FOR 
THE  RELATION. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKCARD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHKCARD  OBTAINS  THE  USER-SPECIFIED  CARDINALTY 
(IF  ANY)  FOR  THE  RELATION  FROM  THE  LISTS, 
VERIFIES  IT  AND  TRANSFERS  IT  TO  NUMERIC 
VARIABLES  WHICH  ARE  RETURNED  TO  THE  CALLING 
ROUTINE.  IF  A  CARDINALITY  IS  OMITTED  BY  THE 
USER,  IT  IS  ASSIGNED  A  DEFAULT  VALUE. 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 


LISTNOS 

ROUTINES  CALLED: 


CPFONE 

LOWUPP 

UWARN 

CPFNXT 

UERROR 


ARGUMENTS : 


NO-IND-ENT 

MIN-NO-DEP-ENT 

MAX-NO-DEP-ENT 

RTN-STATUS 


INCLUDE  FILES: 
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NAME:  CHKCAT 

PURPOSE;  SELECT  COUNT  OF  CATEGORY  RELATIONS  FOR  A  SPECIFIC  KEY 
CLASS 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKCAT 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


This  routine  will  select  the  count  of  category  relations 
for  specific  key  class. 


ARGUMENTS : 


KC-NO 

CAT-COUNT 

RTN-STATUS 


DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[S9 (9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 


3-493 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  CHKCDOM 

PURPOSE:  CHECK  TO  MAKE  SURE  THE  NEW  DOMAIN  WILL  KEEP  EXISTING 
CATEGORIES  VALI 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKCDOM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


This  routine  will  select  the  specific  values  of  a  cateogry 
relation 

and  check  them  against  the  specific  values  allowed  for  the  new 
domain  that  is  to  assigned  to  an  attribute  that  is  also  a 
discriminator 

for  the  category  in  question.  If  category  were  to  become 
invalid 

because  of  the  domain  change,  send  out  error  and  do  not  allow 
change. 


ARGUMENTS : 


AC-NO 

DOM-NO 

RTN-STATUS 


DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 

ROUTINES  CALLED: 


VERVAL 

UERROR 

ERRPRO 


3-494 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 
NAME:  CHKCMPX 

PURPOSE:  DETERMINES  IF  ALGORITHM  CAN  BE  OUTPUTTED 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKCMPX 

SOURCE  FILE  TYPE:  COB 

HOST  * 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ARGUMENTS : 

MOD-TABLE 

RECRD 

DB-ID 

DSPLYtS9(9) 3 

DB-NAME 

DSPLY[X(30) ] 

RT-ID 

DSPLY[X(30) ] 

MOD-ID 

DSPLY[X(10) ] 

AUC-USE-CODE 

DSPLY[X] 

MOD-INST 

DSPLY[S99] 

PREF-NO 

DSPLY[S9 (9) ] 

AUC-PARM-TABLE 

RECRD 

RT-PARM-TABLE 

RECRD 

DF-PARM-TABLE 

RECRD 

INCLUDE  FILES: 

ERRCDM 

SRVRET 

MDTBL 

AUPTBL 

RTPTBL 

DFPTBL 

ERRPRO 

ROUTINES  CALLED: 

SELAPRM 

SELRTPM 

SELDFPM 

GENDALG 

UERROR 

SELDI 

ERRPRO 
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NAME:  CHKDOMS 

PURPOSE:  VERIFY  THAT  THE  DATA  ITEM  AND  ATTRIBUTE  USE  CLASS. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKDOMS 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHKDOM  WILL  VERIFY  THAT  THE  DATA  ITEM  AND 
ATTRIBUTE  USE  CLASS  REFERENCED  IN  THE  VIEW 
COMMAND  ARE  FROM  THE  SAME  DOMAIN  CLASS. 

MODIFICATIONS:  MAY  6,1987-R.  STEWART-  REMOVED  CHECK  FOR  BAD 
TAG-NO 

MAY  28,1987-R.  STEWART-  ADDED  CALL  TO  GETNXNM  FOR 
DATAITEM  NUMBER  AND  CHANGED  INTERFACE  FOR  INSDI, 

INSPDI 


ARGUMENTS : 


VIEW-NO 

EC-NO 

TAG-NAME 

DI-NAME 

DATA-TYPE-NAME 

RET-STATUS 


DSPLY[S9 (9) ] 
DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

UNIQENO 

ROUTINES  CALLED: 


GETDOM 

UERROR 

GETNNUM 

VERDTD 

VERSDT 

VALDTN 

INSDI 

INSPDI 
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NAME:  CHKHPRT 

PURPOSE:  CHECKS  TO  SEE  IF  A  PREVIOUS  MAPPING  WAS  A  STRAIGHT 
MAP 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKHPRT 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ARGUMENTS : 


EC-NO 

TAG-NO 

PREF-NO 

FOUND-FLAG 


DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[S9 (9)  ] 
DSPLY[X] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  CHKINH 

PURPOSE:  checks  the  RC-DEPKC  table  and  determines  when  a  key 
class  can  be  add 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKINH 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHKINH  checks  the  RC-DEPKC  table  and  determines 
when  a  key  class  can  be  added  to  a  dep-ec. 

If  a  key  class  for  a  given  rc-no  and  dep-ec-no  does 

not  appear  further  down  in  the  RC-DEPKC  table 

then  the  key  class (es)  can  be  added  to  the  dep-ec-no. 


ARGUMENTS : 


RC-NO 

DEP-EC-NO 

RC-DEPKC-LIST 

KC-LIST 


DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
RECRD 
RECRD 


INCLUDE  FILES: 


RCDEPKC 

KEYLIST 
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NAME;  CHKKEYS 

PURPOSE:  CHECKS  TO  SEE  IF  A  KEY  CLASS  FULFILLED  RULES. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKKEYS 

SOURCE  FILE  TYPE:  PCO 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CHECKS  TO  SEE  IF  THE  FOLLOWING  RULES  ARE 
FULFILLED: 

1)  A  KEY  CLASS  MUST  BE  DEFINED  FOR  EACH  ENTITY  CLASS 

2)  MULTIPLE  KEY  CLASSES  OF  AN  ENTITY  CLASS  MUST  NOT  BE 
SUBSETS  OF  ONE  ANOTHER. 

3)  A  PRIMARY  KEY  EXISTS  IF  ANY  FOR  AN  ENTITY 

REVISED:  DEC  30 , 1986-CONVERTED  TO  PCO.  ORACLE-LDA  IS  STILL 
BEING  PASSED  IN  EVEN  THOUGH  IT  IS  NO  LONGER  USED. 

5/89:  ORACLE-LDA  IS  NO  LONGER  PASSED. 


ARGUMENTS ; 


EC-NO 

EC-NAME 

RETURN-STATUS 


DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

EOD 

ERRPRO 

ROUTINES  CALLED: 


SQLSCA 

SQLBSl 

SQLSCH 

SQLSCC 

SQLTOC 

SQLOSQ 

SQLADR 

SQLABl 

SQLEXE 

UERROR 

ADDPARM 

SQLCLS 

SQLADl 

SQLFCH 

ERRPRO 
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NAME:  CHKMKM 

PURPOSE;  CHECK  IF  LINK  RELATION  MIGRATED  KEYS  HAVE  BEEN  SPLIT 
IN  DEPENDENT 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKMKM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CHECKS  TO  SEE  IF  THE  FOLLOWING  RULES  ARE 
FU  LF I LLE  D  * 

1)  MIGRATED  KEY  IS  ALL  NON-KEY  OR  ALL  KEY 


ARGUMENTS : 


RC-NO  DSPLY[S9(9)] 
RC-NAME  DSPLY [ X ( 3  0 ) ] 
DEP-EC-NO  DSPLY [ S9 ( 9 ) ] 
EC-NO  DSPLY[S9(9)] 
EC-NAME  DSPLY [ X ( 3  0 ) ] 
NDDL-STATUS  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES; 


SRVRET 

ERRPRO 

ROUTINES  CALLED: 


RETRECP 

ADDPARM 

ERRPRO 


3-500 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  CHKMOD 

PURPOSE:  CHECKS  A  CDM  MODEL  TO  ASSURE  IT  FOLLOWS  IDEFl  RULES 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  CHKMOD 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  DETERMINES  WHETHER  CERTAIN  RULES  ARE  FULFILLED, 
AND  IF  THEY  ARE,  THE  IDEF  MODEL  IS  MARKED  AS  "CHECKED". 

AFTER  EXTRACTING  THE  MODEL  NAME  FROM  THE  PARSER  LISTS, 

VERIFY  THAT  THE  MODEL  EXISTS.  THEN  CHECK  THAT  THE  RULES 
ARE  OBSERVED,  AND  IF  THEY  ARE,  UPDATE  THE  MODEL  AS  "CHECKED". 


INCLUDE  FILES: 


LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERMOD 

UERROR 

NFLOPEN 

ADDPARM 

GETECS 

CHKLOOP 

UPDMOD 

NFLCLOS 

ERRPRO 
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NAME:  CHKOWN 

PURPOSE:  checks  each  of  the  OWN-ec's  key  classes  against  the 
RC-DEPKC_LIST. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  CHKOWN 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CHKOWN  checks  each  of  the  OWN-ec's  key  classes  against 
the  RC-DEPKC_LIST.  If  the  key  class  does  not  appear 
anywhere  in  the  table,  then  the  key  class  is  owned 
by  the  dep-ec  and  can  be  added  at  this  point. 


ARGUMENTS : 


DEP-EC-NO 

RC-DEPKC-LIST 

EC-LIST 

KC-LIST 

RTN-STATUS 


DSPLY[S9(9)  ] 
RECRD 
RECRD 
RECRD 

DSPLY[S9(9) ] 


INCLUDE  FILES: 


RCDEPKC 

ECLIST 

KEYLIST 

ROUTINES  CALLED: 


NEXTKC 

UERROR 
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NAME:  CHKREL 

PURPOSE:  CHECK  IF  RELATIONS  HAVE  BEEN  CREATED  ACCORDING  TO 
STANDARDS 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKREL 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CHECKS  TO  SEE  IF  THE  FOLLOWING  RULES  ARE 
FULFILLED: 

1)  NO  NON-SPECIFIC  RULES 

2)  NO  INCOMPLETE  RELATION  CLASSES 

3)  NO  ONE-TO-ONE  RELATIONSHIPS. 

4)  MIGRATED  KEY  IS  A  PRIMARY  OR  AN  ALTERNATE 

5)  MIGRATED  KEY  HAS  NOT  BEEN  SPILT  IN  DEPENDENT  ENTITY 


ARGUMENTS : 


EC-NO 

EC-NAME 

NDDL-STATUS 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 

ROUTINES  CALLED: 


RETRECP 

ADDPARM 

VERRCC 

VERKCTl 

CHKMKM 

ERRPRO 
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NAME:  CHKRELC 

PURPOSE:  CHECK  IF  CATEGORY  RELATIONS  HAVE  BEEN  CREATED 
ACCORDING  TO  STANDARDS 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CHKRELC 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CHECKS  TO  SEE  IF  THE  FOLLOWING  RULES  ARE 
FULFILLED: 

1)  MORE  THAN  ONE  MEMBER 


ARGUMENTS : 


EC-NO 

EC-NAME 

NDDL-STATUS 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  CHKRNG 

PURPOSE:  CREATES  88  LEVELS  OF  VERIF.  MODULE  FOR  RANGES 

TANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKRNG 

SOURCE  FILE  TYPE:  PRC 

HOST  * 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-RETRIEVES  ALL  RANGES  FROM  DOMAIN_RANGE 
TABLE  TO  INCORPORATE  IN  A  NEW  VERIFICA¬ 
TION  MODULE. 

MODIFIED  MAR  16,  1988  TO  SUPPORT  FIOPS 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

FILE-NAME 

FCB 

MOD-APNAME 

BEGIN-FLAG 

RET-STATUS 


DSPLY[S9 (9) ] 
DSPLY[X{30)  ] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X(80)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(10)  ] 
DSPLY[X] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


SRVRET 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CRTMACR 

OUTFIL 

ERRPRO 
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NAME:  CHKSTMP 

PURPOSE:  CHECK  IF  TAG  MAPPED  TO  SET  HAS  AT  LEAST  TWO  SETS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKSTMP 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  Selects  from  auc  st  mappina 

for  a  tag 

to  see  if  tag  mapped  to  a  set 
two  db.rt_owner  ocurrences 

has  at  least 

ARGUMENTS : 

TAG-NO 

DSPLY[S9 (9) ] 

SET-STATUS 

DSPLY[S9(9) ] 

INCLUDE  FILES: 

ERRCDM 

SRVRET 

ERRPRO 

ROUTINES  CALLED: 

ERRPRO 
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NAME:  CHKVAL 

PURPOSE:  CREATES  88  LEVELS  OF  VERIF.  MODULE  FOR  VALUES 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CHKVAL 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-RETRIEVES  ALL  VALUES  FROM  DOMAIN_VALUE 
TABLE  TO  INCORPORATE  IN  A  NEW  VERIFICA¬ 
TION  MODULE. 

MODIFIED  MAR  16,  1988  TO  SUPPORT  FIOP'S 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

FILE-NAME 

FCB 

MOD-APNAME 

BEGIN-FLAG 

RET-STATUS 


DSPLY[S9 (9)  ] 
DSPLY[X(30)  ] 
DSPLY[X] 
DSPLY[S9(9)  ] 
DSPLY[S9(9)  ] 
DSPLYtX(80)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(10) ] 
DSPLY[X] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


SRVRET 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CRTMACR 

OUTFIL 

ERRPRO 
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NAME:  CKDUPEC 

PURPOSE:  POPULATES  A  TABLE  WITH  ENTITY  NAMES. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CKDUPEC 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  IS  CALLED  FROM  MRGMOD2  WHICH  IN  TURN 
IS  CALLED  BY  MRGMOD  (MERGE  MODEL) 

IT  POPULATES  A  TABLE  WITH  ENTITY  NAMES 

AFTER  VERIFYING  THAT  THE  ENTITY  IS  NOT  ALREADY 

PRESENT. 


ARGUMENTS : 


DEP-EC-NO 

EC-LIST 

FOUND-FLAG 


DSPLY[S9 (9) ] 
RECRD 

DSPLY[S9(9) ] 


INCLUDE  FILES: 
ECLIST 
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NAME:  CKRNLST 

PURPOSE:  SEARCHES  THE  TABLE  OF  RENAME  PAIR  LOOKING  FOR  AN 
OLD-TAG  ENTRY. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CKRNLST 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CKRNLST  SEARCHES  THE  TABLE  OF  RENAME  PAIRS 
LOOKING  FOR  AN  OLD-TAG  ENTRY  WHICH  MATCHES  THE 
TAG-NAME  FROM  CURRENT  KEY  MEMBER  OCCURRENCE. 

IF  A  MATCH  IS  FOUND,  THE  RENAME-TAG  ENTRY  IS 
MOVED  TO  NEW-TAG-NAME .  IF  A  MATCH  IS  NOT 
FOUND,  NEW-TAG-NAME  RETAINS  ITS  DEFAULT  VALUE, 
WHICH  IS  THE  TAG-NAME  OF  CURRENT  KEY  MEMBER. 


ARGUMENTS : 


REN -LI ST 
TAG-NAME 
NEW-TAG-NAME 


RECRD 

DSPLY[X(30) ] 
DSPLY[X(30) ] 


INCLUDE  FILES: 
RENLIST 
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NAME;  CMBACAL 

PURPOSE:  GENERATE  CREATE  ALIAS  ATTRIBUTE..  AND  ALIAS  DESC  TEXT 
COMMANDS 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CMBACAL 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


This  routine  selects  all  the  alias  for  an  attribute 
given  the  ac-no.  Each  time  an  ali?s  name  is  selected 
the  target  model  is  checked.  If  the  alis  does  not 
exist  in  the  target  model,  NDDL  statements  to  create 
the  alias  in  the  target  model  are  generated.  If 
descriptions  are  not  excepted,  NDDL  statements  to  create 
descriptions  of  the  alias  are  also  generated. 


ARGUMENTS : 


TO-MOD-NO 

AC-NO 

AC-NAME 

DESC-FLAG 


DSPLY[S9(9) 3 
DSPLYtS9(9)  ] 
DSPLY[X(30)  ] 
DSPLY [ 9 ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 

ROUTINES  CALLED; 


VERATT 

GENALI 

ERRPRO 
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NAME:  CMBALI 

PURPOSE;  GENERATE  CREATE  ALIAS  ENTITY .. COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CMBALI 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION; 


THIS  ROUTINE  DETERMINES  IF  THE  FROM-EC-NAME  EXISTS  IN  THE 
TO-MODEL  AS  AN  ALIAS  OF  THE  TO-EC.  IF  IT  DOESN'T,  GENERATE 
"CREATE  ALIAS  ENTITY"  COMMAND. 


ARGUMENTS : 


TO-MODEL-NO 

FROM-EC-NO 

TO-EC-NO 

TO-EC-NAME 

COMBINE-TYPE 


DSPLY[S9(9) ] 
DSPLY[S9 (9)  ] 
DSPLYrS9(9)  ] 
DSPLYiX(30)  ] 
DSPLY[9] 


INCLUDE  FILES; 


SRVRET 

ERRPRO 


ROUTINES  CALLED; 


GENALI 

VERALI 

ERRPRO 
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NAME:  CMBEKW 

PURPOSE:  GENERATE  ADD  KEYWORD  CLAUSE  FOR  ENTITY  KEYWORDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CMBEKW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  GENERATES  THE  ADD  KEYWORD  PHRASE  IN  COMBINE 
ENTITY  FOR  EACH  KEYWORD  FOUND  IN  THE  FROM  MODEL,  BUT  NOT 
FOUND  IN  THE  TO-MODEL. 


ARGUMENTS : 


FROM-EC-NO 

TO-EC-NO 

CREATE-FLAG 

COMBINE-TYPE 

KW-COUNT 


DSPLY[S9 (9) ] 
DSPLY[S9 (9) ] 
DSPLY[9] 
DSPLY[9] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


VERKWE 

ADPARMl 

ERRPRO 
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NAME:  CMBENT 

PURPOSE tCONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE  ENTITY  COMMAND. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CMBENT 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


THIS  ROUTINE  CONROLS  THE  PROCESSING  LOGIC  FOR  THE  COMBINE  ENTITY 
COMMAND.  IT  GENERATES  THE  NECESSARY  NDDL  COMMANDS  TO  POPULATE  THE 
TO-MODEL  WITH  THE  ALIASES,  DESCRIPTIONS,  RELATIONS  AND  ATTRIBUTES 
ASSOCIATED  WITH  THE  FROM-MODEL  ENTITY.  ENTITIES  MAY  BE  COMBINED 
WITHIN  THE  SAME  MODEL (INTRA  MODEL)  OR  BETWEEN  TWO  MODELS 
(INTER-MODEL).  MODIFIED  6/29/89:  TO  HANDLE  CATEGORY  AND  LINK 
RELATIONS  NOTE:  0  =  INTRA-MODEL  COMBINE 
1  =  INTER-MODEL  COMBINE 

0  =  USER  WANTS  KEYWORDS,  ALIASES  AND/OR  DESCRIPTIONS 
1  =  USER  WANTS  THE  ABOVE  EXCEPTED. 

ARGUMENTS : 


MODEL-NO  DSPLY [ S9 ( 9 ) ] 

MODEL-NAME  DSPLY [ X ( 3  0 ) ] 

INCLUDE  FILES: 


LISTNOS 

RELTBL 

CHKMODL 

ERRPRO 


ROUTINES  CALLED: 


UERROR 

CPFONE 

CPFNXT 

EXCFLAG 

VERMOD 

VERENT 

FNDECCR 

FNDECMl 

NFLOPEN 

ADDPARM 

FRTOREL 

FNDECCM 

BLKCLl 

GENENTl 

DEPFROM 

CATFROM 

GENALTE 

INDFROM 

GENFROM 

NFLCLOS 

ERRPRO 
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NAME:  CMBOA 

PURPOSE:  GENERATE  COMMANDS  FOR  ATTRIBUTES,  ITS 
KEYWORDS , ALIAS , DESC 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  CMBOA 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  GENERATES  A  CREATE  ATTRIBUTE  COMMAND  FOR  EACH 
OWNED  ATTRIBUTE,  ALONG  WITH  THEIR  KEYWORDS,  ALIASES  AND 
DESCRIPTIONS. 

mar  18,1988  :  merge  model  output  was  intermixed,,  output 
should  be  displayed  at  end  of  ndml  statement 


ARGUMENTS : 

TO-MOD-NO 

DSPLY[S9(9) ] 

FROM-EC-NO 

DSPLY[S9(9) ] 

TO-EC-NAME 

DSPLY[X(30) ] 

KW-FLAG 

DSPLY[9] 

ALIAS-FLAG 

DSPLY [ 9 ] 

DESC-FLAG 

DSPLY [ 9 ] 

COMBINE-TYPE 

DSPLYt9] 

CREATE-FLAG 

DSPLY[9] 

ATT-COUNT 

DSPLY[S9(9) ] 

INCLUDE  FILES: 

SRVRET 

ERRPRO 

ROUTINES  CALLED: 

VERATT 

GENATT 

GENDESC 

CMBACAL 

ADPARMl 

ERRPRO 
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NAME;  CMBRKW 

PURPOSE:  SELECT  AND  GENERATE  RELATION  CLASS  KEYWORDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CMBRKW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  SELECTS  A  RELATION  CLASS  KEYWORD  GIVEN  THE 
RELATION  CLASS  NUMBER. 


DSPLY[S9(9) ] 
DSPLY[S9 (9)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ARGUMENTS : 


FROM-RC-NO 

TO-RC-NO 


ROUTINES  CALLED: 


VERKWR 

ADDPARM 

ERRPRO 
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NAME:  CMCOUNT 

PURPOSE:  SELECT  COUNT  OF  CAT_MEMBER  FOR  A  GIVEN  RC_NAME  AND 
GENERIC  ENTITY  NA 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CMCOUNT 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


SELECT  COUNT  OF  CATEGORY  MEMBERS  FOR  A  GIVEN  RC_NAME 
AND  GENERIC  ENTITY  NAME 


ARGUMENTS : 


MODEL-NAME 

EC-NAME 

RC-NAME 

CAT-COUNT 


DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[X(30)  ] 
DSPLY[S9 (9) ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 
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NAME:  CMPCRDA 

PURPOSE:  SELECT  THE  DISCRIMINATING  ATTRIBUTE  FOR  RC  NAME  AND 
GENERIC  ENTITY  N 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CMPCRDA 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


SELECT  DISCRIMINATING  ATTRIBUTE  NAME  FOR  A  GIVEN  RC  NAME 
AND  GENERIC  ENTITY  NAME  AND  MODEL  NAME 


DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[X(30)  ] 
DSPLY[X(30)  ] 


INCLUDE  FILES: 


SRVRET 

ERRPRO 


ARGUMENTS : 


MODEL-NAME 

EC-NAME 

RC-NAME 

DA-NAME 


ROUTINES  CALLED: 


ERRPRO 
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NAME:  CMPMOD 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  TO  COMPARE  TWO  MODELS. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CMPMOD 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  COMMAND  CONTROLS  THE  PROCESSING  LOGIC  TO  COMPARE  TWO 
MODELS,  AND  OUTPUTS  THE  DIFFERENCES. 

MODIFIED  9/4/89:  ADDED  LOGIC  TO  HANDLE  CATEGORY  RELATIONS 
AFTER  EXTRACTING  AND  VERIFYING  THAT  THE  2  MODELS  EXIST, 
COMPARE  THE  ENTITIES,  ATTRIBUTES  AND  KEYWORDS  WITHIN  THE 
MODEL. 


INCLUDE  FILES; 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

CPFNXT 

VERMOD 

UERROR 

NFLOPEN 

LOWUPP 

RETREC2 

RETRECl 

RETRAC2 

RETRACl 

ENTKW 

ATTKW 

RELKW 

RCLASS 

RCLASA 

CRCLASS 

CRCLASA 

ADDPARM 

NFLCLOS 

ERRPRO 
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NAME:  CONVCHR 

PURPOSE:  CONVCHR  -  VERIFY  A  NUMERIC  VALUE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CONVCHR 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


FUNCTION  CONVCHR  VALIDATES  A  CHARACTER  STRING  TO  DETERMINE 
WHETHER  IT  IS  NUMERIC.  THE  FOLLOWING  RULES  ARE  APPLIED: 

1.  A  SIGN,  IF  PRESENT,  MUST  BE  EITHER  •'  +  ••  OR  AND 

MUST  IMMEDIATELY  PRECEED  A  DECIMAL  DIGIT  OR  DECIMAL 
POINT. 

2.  THE  NUMBER,  INCLUDING  SIGN,  DOES  NOT  HAVE  TO  BE  LEFT 
JUSTIFIED  IN  THE  FIELD,  AS  LONG  AS  THERE  ARE  NO 
EMBEDDED  BLANKS. 

3.  THERE  MAY  BE,  AT  MOST,  ONE  DECIMAL  POINT. 

4.  A  DECIMAL  NUMBER  MUST  EITHER  PRECEED  OR  FOLLOW  THE 
DECIMAL  POINT.  A  DECIMAL  NUMBER  MAY  BOTH  PRECEED 

AND  FOLLOW  THE  DECIMAL  POINT. 

5.  AT  LEAST  ONE  DECIMAL  DIGIT  MUST  APPEAR  IN  THE  NUMBER. 
IF  VIOLATIONS  OF  THE  ABOVE  RULES  OCCURS,  AN  ERROR  MESSAGE 
IS  GENERATED. 

APPLY  RULES  1  THROUGH  5.  GENERATE  FATAL  ERROR  MESSAGE 
IF  NECESSARY. 


ARGUMENTS : 


VALUE- IN  RECRD 

ERROR-STATUS  DSPLY [ S9 ( 9 ) ] 
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NAME:  CONVCPF 

PURPOSE:  CONVERT  A  CHARACTER  VARIABLE  TO  INTEGER 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  CONVCPF 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  IS  CALLED  WHENEVER  A  CHARACTER 
VARIABLE  X(4)  IS  TO  BE  CONVERTED  TO  AN 
INTERGER  FIELD  S9(9)  COMP. 

AN  INTEGER  TOKEN  IS  PLACED  ON 
THE  PARSER  LIST  (CPF)  AS  CHARACTER  X(4).  THIS 
TOKEN  NEEDS  TO  BE  RE-CONVERTED  TO  INTEGER, 
do  not  call  this  routine  if  no  variable 
was  returned  after  a  cpf  call. 


ARGUMENTS : 


IN-FIELD 

OUT-FIELD 


DSPLY[X(4) ] 
DSPLY[S9(9)  ] 
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NAME:  COPAALI 

PURPOSE:  GENERATE  CREATE  ALIAS  ATTRIBUTE  COMMANDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  COPAALI 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  Generate  create  alias  attribute  commands. 


ARGUMENTS : 


AC-NO 

AC-NAME 

COPY-TYPE 

TO-MODEL-NO 


DSPLY[S9(9) ] 
DSPLY[X(30)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

VERATT 

GENALI 

ERRPRO 
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NAME:  COPAKW 

PURPOSE:  GENERATE  ALTER  ATTRIBUTE  ADD  KEYWORD  COMMANDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  COPAKW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  Generate  alter  attribute  keyword  commands. 


ARGUMENTS : 


AC-NO 

AC-NAME 


DSPLY[S9 (9)  ] 
DSPLY[X(30)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  COPATT 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  COPYING  AN 
ATTRIBUTE. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  COPATT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  COPYING 
AN  ATTRIBUTE  TO  A  MODEL. 

RETRIEVE  THE  ATTRIBUTE  NAME  TO  BE  COPIED.  THEN  DETERMINE 
IF  THE  COPY  WILL  BE  DONE  IMMEDIATELY  OR  GENERATED  ON  A  FILE. 
ALSO  DETERMINE  WHETHER  THE  KEYWORDS,  ALIASES  OR  DESCRIPTIONS 
ARE  TO  BE  COPIED. 


DSPLY[S9 (9) 3 
DSPLY[X(30) 3 


INCLUDE  FILES: 


LISTNOS 

CHKMODL 

ERRPRO 

ROUTINES  CALLED: 


UERROR 

CPFONE 

CPFNXT 

EXCFLAG 

VERMOD 

VERACNM 

I COPATT 

FCOPATT 

ERRPRO 


ARGUMENTS : 


MODEL-NO 

CUR-MODEL-NAME 
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NAME l  COPCKW 

PURPOSE:  GENEREATE  ALTER  CATEGORY  ADD  KEYWORD  COMMANDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  COPCKW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  Genrate  alter  category  add  keyword  commands. 


ARGUMENTS : 


IND-EC-NAME 

RC-NAME 

RC-NO 

KW-CNT 


DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[S9(9)  ] 
DSPLy[S9(9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  COPEKW 

PURPOSE:  GENERATE  ALTER  ENTITY  ADD  KEYWORD  COMMANDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  COPEKW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  Generate  alter  entity  add  keyword  command.  Generate 
alter  entity  add  then  generate  the  keyword  EC-KW-NAME  portion 
of  the  command. 


ARGUMENTS : 


FROM-EC-NO 

TO-EC-NAME 

KW-CNT 


DSPLY[S9 (9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  COPENT 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY  ENTITY 
COMMAND. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  COPENT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  controls  the  processing  logic  for 
the  copy  entity  command.  Retrieve  information  from  parser 
lists  and  do  some  initial  verification.  Then  branch  to 
routines  depending  on  type  of  copy:  intra/inter, 
simple/with  structure/with  reation,  on  file/directly. 


DSPLY[S9(9) ] 
DSPLY[X(30) ] 


INCLUDE  FILES: 


LISTNOS 

CHKMODL 

ERRPRO 

ROUTINES  CALLED: 


UERROR 

CPFONE 

VERMOD 

VERENT 

CPFNXT 

LOWUPP 

TRADIR 

TRAFIL 

TERSIM 

TERDIR 

TERSTR 

TERREL 

ERRPRO 


ARGUMENTS : 


MODEL-NO 

CUR-MODEL-NAME 
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NAME:  COPOA 

PURPOSE:  GENERATE  CREATE  ATTRIBUTE  OR  ALTER  ENTITY  OWNED 
ATTRIBUTE 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  COPOA 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


If  GEN_FLAG  is  0  gnerate  CREATE  ATTRIBUTE  commands, 

ALTER  ATTRIBUTE  ADD  KEYWORDS  commands  (if  keywords  are  not 
excepted),  CREATE  ALIAS  ATTRIBUTE  COMMANDS  (if  aliases  are  not 
excepted),  and  DESCRIBE  ATTRIBUTE  COMMANDS  (if  descriptions  are 
not  excepted) .  If  GEN_FLAG  is  1  generate  ALTER  ENTITY  ADD  OWNED 
ATTRIBUTE  commands. 


ARGUMENTS : 

FROM-EC-NO 

DSPLY[S9(9)  J 

TO-EC-NAME 

DSPLY[X(30) ] 

TO-MODEL-NO 

DSPLY[S9(9) ] 

GEN-FLAG 

DSPLY[X] 

ALIAS-FLAG 

DSPLY[X] 

KEYWORD-FLAG 

DSPLY[X] 

DESC-FLAG 

DSPLY[X] 

COPY-TYPE 

DSPLY[X(30) ] 

FROM-MOD-NO 

DSPLY[S9(9) ] 

NKEY-FLAG 

DSPLY[X] 

INCLUDE  FILES: 

ERRCDM 

SRVRET 

ERRPRO 

ROUTINES  CALLED: 

GENATTR 

ADDPARM 

ERRPRO 

3-527 


PS  620341100 
30  September  1990 


DOCGROUP  PS41100  Module  Documentation 


NAME:  COPRKW 

PURPOSE:  GENEREATE  ALTER  RELATION  ADD  KEYWORD  COMMANDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  COPRKW 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  Genrate  alter  relation  add  keyword  commands. 


ARGUMENTS : 


IND-EC-NAME 

RC-NAME 

RC-NO 

DEP-EC-NAME 

KW-CNT 


DSPLY[X(30)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  COPVALI 

PURPOSE:  GENERATE  CREATE  ALIAS  ENTITY  COMMANDS  FOR  AN 
INTER-MODEL  COPY. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  COPVALI 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ARGUMENTS : 


FROM-EC-NO 

TO-EC-NAME 

MODEL-NO 

COPY-TYPE 

FROM-MOD-NO 


DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9 (9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

GENALI 

VERENT 

ERRPRO 
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NAME;  COPYAC 

PURPOSE;  RETRIEVE  INFO  TO  COPY  AN  ATTRIBUTE 

LANGUAGE;  VAX- 11  COBOL 

SOURCE  FILE;  COPYAC 

SOURCE  FILE  TYPE;  PRC 

HOST; 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION; 


This  routine  selects  information  to 
create  an  attribute,  add  as  owned  to 


an  entity  and  finally  add  all 


ARGUMENTS ; 


NEW-EC-NO 

OLD-EC-NO 

TO-MODEL-NO 

KW-FLAG 

ALIAS-FLAG 

DESC-FLAG 

KEY-FLAG 

NKEY-FLAG 

KC-LIST 


INCLUDE  FILES; 


SRVRET 

KCLIST 

ERRPRO 

ROUTINES  CALLED; 


TERATTR 

ERRPRO 


key  classes  for  the  entity  class. 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[9] 
DSPLY[9] 
DSPLY[9] 
DSPLY[9] 
DSPLY [ 9 ] 
RECRD 
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NAME:  CPARM 

PURPOSE:  CALL  ADDPARM  USING  VARIABLES  FROM  C  PROGRAMS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPARM 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  C  PROGRAMS  RCLASS  AND  RCLASA  CALL  THIS 
PROGRAM  TO  STRUCTURE  THE  OUTPUT  MESG 
WHEN  A  RELATION  CLASS  EXISTS  IN  TWO  MODELS 
AND  CALL  "ADDPARM" 


ARGUMENTS : 


DSPLY[X(30) ] 
DSPLY[X(30)  ] 
DSPLY[X(30) ] 


ROUTINES  CALLED: 


ADDPARM 


IND-EC-NAME 

RC-NAME 

DEP-EC-NAME 
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NAME;  CPDDRAL 

PURPOSE:  PROCESS  COPY  DESCRIPTION  ALL  TYPES  DIRECTLY 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPDDRAL 

SOURCE  FILE  TYPE:  COB 

HOST; 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


LL  TYPES  DIRECTLY 

DESCRIPTION  :-  This  routine  will  copy  every  descripiton 
type  directly  into  the  CDM.  First,  this  routine  will  retrieve 
the  object  type  and  verify  it  exists.  Then,  the  object  numbers 
will  be  retrieved.  Finally,  all  description  will  be  copied. 
MODIFIED  6/1/89  :  CHANGE  SECOND  CALL  TO  VEROBJ  BECAUSE 
TO-OBJECTS 

ARE  NOT  ON  THE  SAME  LIST  AS  THE  FROM-OBJECTS 


ARGUMENTS : 


FROM-MOD-NO 

CUR-MOD-NO 

RET-STATUS 


DSPLYtS9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X{5)  ] 


INCLUDE  FILES; 


CHKCDM 

ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VEROBJ 

VROBJ 

SELDESC 

UERROR 

UWARN 

ERRPRO 
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NAME:  CPDDRSP 

PURPOSE:  PROCESS  COPY  DESCRIPTION  WITH  SPECIFIED  DESC  DIRECTLY 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPDDRSP 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ITH  SPECIFIED  DESC  DIRECTLY 

DESCRIPTION  :-  This  routine  will  retrieve  the  object  type 
off  the  parser  list.  It  then  calls  routines  to  verify  the 
object  type  and  retrieve  the  from  and  to  object  name(s). 
For  each  description  type  specified,  the  description  will 
be  retrieved  from  the  from  object  name  and  copied  to  the 
to  object  name. 

MODIFIED  6/1/89  :  CHANGED  SECOND  CALL  TO  VEROBJ  BECAUSE 
TO-OBJECTS 

ARE  NOT  ON  THE  SAME  LIST  AS  THE  FROM-OBJECTS 


ARGUMENTS : 


FROM-MOD-NO 
CUR-MOD-NO 
DES -COUNT 
DESC-TYPE 
RET-STATUS 


DSPLY[S9(9)  ] 
DSPLY[S9 (9)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VEROBJ 

VROBJ 

SELIDSC 

CPFNXT 

UERROR 

ERRPRO 
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NAME:  CPDOFAL 

PURPOSE;  PROCESS  COPY  ALL  DESCRIPTION  TYPE,  ON  FILE 

LANGUAGE;  VAX-11  COBOL 

SOURCE  FILE;  CPDOFAL 

SOURCE  FILE  TYPE:  COB 

HOST; 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


YPE,  ON  FILE 

DESCRIPTION  :-  This  routine  will  process  a  copy  all 
descripiton  types  on  file.  First  the  object  type  is  retrieved 
and  verified  and  the  object  number (s)  and  name(s)  are 
retrieved. 

An  ALTER  MODEL  command  is  then  generated  if  the  object  is  a 
modelling  object.  Then,  all  the  DESCRIBE  commands  are 
generated. 

MODIFIED  6/1/89  :  CHANGED  SECOND  CALL  TO  VEROBJ  BECAUSE 
TO-OBJECTS 

ARE  NOT  ON  THE  SAME  LIST  AS  FROM-OBJECTS 


ARGUMENTS ; 

FROM-MOD-NO 

DSPLY[S9 (9) ] 

CUR-MOD-NO 

DSPLY[S9(9) ] 

FROM-MOD-NAME 

DSPLY[X(30) ] 

CUR-MOD-NAME 

DSPLY[X(30) ] 

RET-STATUS 

DSPLY[X(5) ] 

INCLUDE  FILES: 

CHKCDM 

ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 

NFLOPEN 

CPFONE 

VEROBJ 1 

VROBJl 

ADDPARM 

GENDESC 

NFLCLOS 

UERROR 

ERRPRO 
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NAME:  CPDOFSP 

PURPOSE:  PROCESS  COPY  DESCRIPTION  SPECIFIED  TYPES  ON  FILE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPDOFSP 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


PECIFIED  TYPES  ON  FILE 


DESCRIPTION  :-  This  routine  will  process  the  case  where 
the  description  types  are  specified  and  NDDL  commands  are 
written  on  file.  The  object  type  is  retrieved  and  verified 
and  the  object  number  and  names(s)  are  also  retrieved.  If  no 
destination  object  name  is  specified,  the  default  is  the  from 
object  name.  This  will  generate  a  DESCRIBE  command  for  each 
description  type  specified. 

MODIFIED  6/1/89  :  CHANGED  SECOND  CALL  TO  VEROBJl  BECAUSE  OF 
TO-OBJECTS 

NOW  NOT  ON  THE  SAME  LIST  AS  FROM-OBJECTS 


ARGUMENTS : 


FROM-MOD-NO 

CUR-MOD-NO 

FROM-MOD-NAME 

CUR-MOD-NAME 

DES -COUNT 

DESC-TYPE 

RET-STATUS 


DSPLY[S9(9) ] 
DSPLYtS9(9) ] 
DSPLY[X(30) ] 
DSPLYtX(30)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


NFLOPEN 

CPFONE 

VEROBJl 

VROBJl 

ADDPARM 

NFLCLOS 

GENIDSC 

CPFNXT 

UERROR 

ERRPRO 
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NAME:  CPYIHST 

PURPOSE:  COPY  A  USER  SPECIFIED  HOST  ID  IN  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYIHST 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


ANY  PSB'S  ARE  ASSOCIATED  WITH  THE  GIVEN  HOST  ID 
AND  A  'DESCRIBE'  COMMAND  FOR  THE  HOST  ID  IF  ANY 
TEXTUAL  DESCRIPTION  EXISTS. 


ARGUMENTS : 


HOST-ID 

HOST-NO 

DESC-FLAG 

PSB-FLAG 

RET-STATUS 


DSPLY[X(30) ] 
DSPLY[S9 (9)  ] 
DSPLY[X] 
DSPLY[X] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ADDPARM 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

GENPSB 

GENDESC 

ERRPRO 
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NAME:  CPYISMD 

PURPOSE:  COPY  A  NDDL  USER  DEFINED  SOFTWARE  MODULE  IN  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYISMD 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CALLED  FROM  CPYMODU  AND  SELMODS,  THIS  SUBPROGRAM 
WILL  GENERATE  A  'DEFINE  MODULE*  COMMAND. 


ARGUMENTS : 


MOD- ID 

LANG-NAME 

RET-STATUS 


DSPLY[X(10)  ] 
DSPLY[X(10)  ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

ADDPARM 

ERRPRO 


ROUTINES  CALLED: 


ADDPARM 

ERRPRO 
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NAME:  CPYDB 

PURPOSE;  CONTROLLING  MODULE  FOR  COPY  DATABASE  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYDB 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  This  routine  is  the  controlling  module  for 
the  copy  database  command. 


INCLUDE  FILES; 


DBTBL 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

LOWUPP 

ALLDB 

GENDB 

NFLCLOS 

VERDBAL 

CPFNXT 

ERRPRO 
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NAME:  CPYDBMS 

PURPOSE:  CONTROLS  PROCESSING  LOGIC  OF  COPY  DBMS  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYDBMS 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  THIS  ROUTINE  CONTROLS  THE  COPY  DBMS  COMMAND. 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

LOWUPP 

ALLDBMS 

VERDBMS 

ADDPARM 

SELHOST 

SELDB 

CPFNXT 

NFLCLOS 

ERRPRO 
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NAME:  CPYDOM 

PURPOSE:  GENERATE  NDDL  COMMANDS  TO  MAKE  A  COPY  OF  DOMAINS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYDOM 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  PARSE  ALL  THE  LISTS  AND  CONTROL  THE  LOGIC 
TO  GENERATE  THE  NDDL  COMMANDS  FOR  ALL  THE 
DOMAINS  FOR  A  DATABASE  OR  THE  DOMAIN  NAMES  LISTED 
ON  THE  "COPY  DOMAIN”  COMMAND 


XCEPTION  LIST 


INCLUDE  FILES: 


LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

ALLDOM 

NFLCLOS 

ERRPRO 

UWARN 

VERDOM 

GENDOM 

CPFNXT 
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NAME:  CPYDSTP 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY  DESC  TYPE 
COMMAND 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CPYDSTP 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY  DESCRIPTION 
TYPE  COMMAND.  THIS  DRIVER  CALLS  VARIOUS  ROUTINES  TO 
GENERATE  ALL  THE  NDDL  STATEMENTS  NECESSARY  TO  CREATE  THE 
DESCRIPTION  TYPES  CONTAINED  THE  CDM 

-  AFTER  DETERMININ  THE  NUMBER  OF  TYPES  TO 
COPIED,  VERIFY  THAT  THE  SPECIFIC  TYPE 
EXISTS  AND  GENERATE  THE  NDDL  TO  CREATE 
THE  TYPE  OR  ISSUE  A  WARNING  FOR  NONEXISTANT 
DESCRIPTION  TYPES. 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


NFLOPEN 

CPFONE 

NFLCLOS 

SELDSTP 

VERDSTP 

WRTDSTP 

CPFNXT 

UWARN 

ERRPRO 
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NAME:  CPYHST 

PURPOSE:  COPY  USER  SPECIFIED  HOST(S)  OR  ALL  HOSTS  IN  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYHST 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC 
FOR  THE  COPY  HOST  COMMAND 


ARSER  LIST,  IF  "DESC  WORD 
FOUND  SET  DESC-FLAG. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

CPFNXT 

LOWUPP 

NFLCLOS 

VERHST 

CPYIHST 

SELHSTS 

ERRPRO 
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NAME:  CPYMAP 

PURPOSE:  CONTROLLING  MODULE  FOR  COPY  MAP  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYMAP 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  controls  the  logic  for  the  copy  map 
command.  It  calls  one  of  four  routines  depending 
on  the  object  the  map  is  to  be  copied  for:  entity, 
relation,  record  ,  or  set. 

MODIFIED  5/1/89:  ADDED  TYPE  CATEGORY. 


INCLUDE  FILES: 


LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

LOWUPP 

CPYMENT 

CPYMREL 

CPYMREC 

CPYMSET 

CPYMCAT 

NFLCLOS 

ERRPRO 
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NAME:  CPYMCAT 

PURPOSE:  CONTROL  MODULE  FOR  COPY  MAP  TO  CATEGORY 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  CPYMCAT 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  MODIFIED  TO  HANDLE  CATEGORY  RELATIONS  ONLY 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

ALLMCAT 

ALMROJC 

CPFNXT 

VERENT 

UERROR 

VERCR 

GENMROJ 

SELRMAP 

ERRPRO 
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NAME:  CPYMENT 

PURPOSE:  PROCESS  COPY  MAP  FOR  ENTITY  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYMENT 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  This  routine  controls  processing  of  the  copy 
map  for  entity  command.  It  calls  ailment  if  all 
entities  are  to  be  processed,  or  calls  selpec 
and  genment  if  only  certain  entities  are  to  be 
processed. 


ARGUMENTS : 


PART-FLAG  DSPLY[X] 

UNION-FLAG  DSPLYtX] 


INCLUDE  FILES: 


LISTNOS 

UNTBL 

MDTBL 

ERRCDM 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

ALLECRT 

ALLMENT 

SELPEC 

UERROR 

GENECRT 

CPFNXT 

GENMENT 

ERRPRO 
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NAME:  CPYMOD 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY  MODEL 
COMMAND. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CPYMOD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  COPY  MODEL  COMMAND. 
GENERATES  ALL  THE  NDDL  STATEMENTS  NECESSARY  TO  POPULATE 
THE  TARGET  MODEL  WITH  THE  ATTRIBUTES,  ENTITIES,  RELATIONS, 
KEY  CLASSES,  KEYWORDS,  ALIASES  AND  DESCRIPTIONS  CONTAINED 
IN  THE  FROM-MODEL. 

LAUSE  IF  ANY 


ARGUMENTS : 


MODEL-NO  DSPLY[S9(9)] 

MOD-NAME  DSPLY [ X ( 3  0 ) ] 

INCLUDE  FILES: 


DEPECL 

LISTNOS 

RCDEPKC 

ROUTINES  CALLED: 


NFLOPEN 

CPFONE 

UERROR 

MODOATT 

MODATT 

ADDPARM 

MODENT 

MODKC 

COPTOPE 

MODRCKC 

MODRELA 

VERMOD 

CPFNXT 

VERENT 

LDECLST 

DEPEC 

NFLCLOS 

UWARN 
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NAME:  CPYMODU 

PURPOSE:  COPY  NDDL  USER  DEFINED  SOFTWARE  MODULES  IN  THE  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYMODU 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC 
FOR  THE  COPY  MODULE  COMMAND 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

NFLCLOS 

VERSMOD 

CPYISMD 

CPFNXT 

SELMODS 

ERRPRO 
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NAME:  CPYMREC 

PURPOSE:  CONTROLS  PROCESSING  OF  THE  COPY  MAP  FOR  RECORD 
COMMAND 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CPYMREC 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  ROUTINE  CONTROLS  THE 
COPY  MAP  FOR  DATABASES/RECORD  NAME(S). 
"ALLMREC  IS  CALLED  IF  ALL  DATABASE/ 
RECORD  MAPS  ARE  TO  BE  COPIED,  ELSE 
••SELMREC"  IS  CALLED  IF  ONLY  SPECIFIC 
DATABASE/RECORD  MAPS  ARE  TO  BE  COPIED 


ARGUMENTS : 


DSPLY[X3 

DSPLYtX] 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

MDTBL 

HPTBL 

ECRTBL 

ERRPRO 


PART-FLAG 

UNION-FLAG 


ROUTINES  CALLED: 


CPFONE 

ALLECRT 

ALmREC 

VERREC 

UERROR 

SELMREC 

CPFNXT 

ERRPRO 
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NAME;  CPYMREL 

PURPOSE:  CONTROL  MODULE  FOR  COPY  MAP  TO  RELATION 

LANGUAGE;  VAX- 11  COBOL 

SOURCE  FILE;  CPYMREL 

SOURCE  FILE  TYPE:  COB 

HOST; 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION; 

-  MODIFIED  TO  HANDLE  LINK  RELATIONS  ONLY 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

ALLMREL 

ALLMROJ 

CPFNXT 

VERENT 

UERROR 

VERLR 

GENMROJ 

SELRMAP 

ERRPRO 
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NAME:  CPYMSET 

PURPOSE:  CONTROLS  PROCESSING  OF  THE  COPY  SET  MAPS  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYMSET 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 

-  THIS  ROUTINE  CONTROLS  THE 
COPY  SET  MAPS  COMMAND 

MODIFIED  5/1/89:  TO  HANDLE  BOTH  CATEGORY  AND  LINK  RELATIONS 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

ALLRSET 

ALLCSET 

VERDB 

UERROR 

VERRSET 

SELSET 

SELSETC 

CPFNXT 

ERRPRO 
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NAME:  CPYREC 

PURPOSE:  CONTROLLING  MODULE  FOR  COPY  RECORD  COMMAND 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CPYREC 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


This  is  the  controlling  module  for  the  copy 
record  command.  It  will  call  GETRDH  for  database 
information,  generate  an  ALTER  DATABASE  command, 
get  record  information,  and  based  on  this  record 
info  will  call  either  ALLREC  or  GENREC 


INCLUDE  FILES: 


LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

GETRDH 

CPFONE 

LOWUPP 

ADDPARM 

ALLREC 

NFLCLOS 

VERRT 

GENREC 

CPFNXT 

ERRPRO 
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NAME;  CPYSET 

PURPOSE:  GENERATE  NDDL  COMMANDS  TO  MAKE  A  COPY  OF  SETS 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  CPYSET 

SOURCE  FILE  TYPE;  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  PARSE  ALL  THE  LISTS  AND  CONTROL  THE  LOGIC 
TO  GENERATE  THE  NDDL  COMMANDS  FOR  ALL  THE 
SETS  FOR  A  DATABASE  OR  THE  SET  NAMES  LISTED 
ON  THE  "COPY  SET"  COMMAND 


XCEPTION  LIST 


INCLUDE  FILES; 


LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

VERDBAS 

GETGLOB 

ADDPARM 

ALLSET 

NFLCLOS 

ERRPRO 

VERDBST 

GENSET 

CPFNXT 
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NAME:  CPYVIEW 

PURPOSE;  copy  USER  SPECIFIED  VIEW(S)  OR  ALL  VIEWS  IN  THE  CDM 

LANGUAGE;  VAX- 11  COBOL 

SOURCE  FILE;  CPYVIEW 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC 
FOR  THE  COPY  VIEW  COMMAND 


ARSER  LIST,  IF  ''DESC  WORD 
FOUND  SET  DESC-FLAG. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


NFLOPEN 

UERROR 

CPFONE 

CPFNXT 

LOWUPP 

NFLCLOS 

VERVIEW 

GENVIEW 

GTVIEWS 

ERRPRO 
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NAME:  CREATTR 

PURPOSE:  Generate  nddl  commands  to  create  the  attribute  and 
assoc. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CREATTR 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


After  selecting  all  the  attributes  in  the  from 

model  in  the  prc  routine  modatt  this  routine  will 

generate  the  nddl  commands  to  create  the  attributes 

and  its  associated  keywords,  aliases,  and 

descriptions . 

This  routine  will  process  each  row  selected  in 

the  prc  routine  modatt.  For  each 

row ( attribute ) 

selected  a  nddl  command  to  create  this  attribute 

will  be  generate  along  with  its  aliases, 
keywords,  and  descriptions  depending  on  user 
defined  except  clauses  in  the  copy  model 


command . 

ARGUMENTS : 

AC-NO 

DSPLY[S9(9)  ] 

AC-NAME 

DSPLY[X(30) ] 

AC-NAME-TYPE 

DSPLY[X(30) ] 

ROW-COUNTER 

DSPLY[S9(9) ] 

DOMAIN-NAME 

DSPLY[X(30) ] 

KEYWORD-FLAG 

DSPLY[9] 

DESC-FLAG 

DSPLY[9] 

ALIAS-FLAG 

INCLUDE  FILES: 

CHKCDM 

ERRCDM 

ERRPRO 

ROUTINES  CALLED: 

ADDPARM 

GENATT 

GENDESC 

GENALI 

ERRPRO 

DSPLY[9] 
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NAME :  CRPARM 

PURPOSE:  CALL  ADDPARM  USING  VARIABLES  FROM  C  PROGRAMS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRPARM 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  C  PROGRAMS  CRCLASS  AND  CRCLASA  CALL  THIS 
PROGRAM  TO  STRUCTURE  THE  OUTPUT  MESG 
WHEN  A  CATEGORY  RELATION  EXISTS  IN  TWO  MODELS 
AND  CALL  "ADDPARM'' 


DSPLY[X(30)  3 
DSPLY[X(30)  ] 
DSPLY[X(10)  3 


ROUTINES  CALLED; 


ADDPARM 


ARGUMENTS : 


IND-EC-NAME 

RC-NAME 

CAT-TYPE-CODE 
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NAME:  CRPARM2 

PURPOSE:  CALL  ADDPARM  USING  VARIABLES  FROM  C  PROGRAMS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRPARM2 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  C  PROGRAMS  CRCLASS  AND  CRCLASA  CALL  THIS 
PROGRAM  TO  STRUCTURE  THE  OUTPUT  MESG 
WHEN  A  CATEGORY  RELATION  EXISTS  IN  TWO  MODELS 
AND  CALL  ‘'ADDRARM" 


ARGUMENTS ; 


DSPLY[X(30) ] 
DSPLY[X(30) ] 
DSPLY[X(10)  ] 


ROUTINES  CALLED: 


ADDPARM 


IND-EC-NAME 

RC-NAME 

DA-NAME 
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NAME;  CRPARM3 

PURPOSE:  CALL  ADDPARM  USING  VARIABLES  FROM  C 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE;  CRPARM3 

SOURCE  FILE  TYPE;  COB 

HOST: 

SUBSYSTEM;  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  C  PROGRAMS  CRCLASS  AND  CRCLASA  CALL  THIS 
PROGRAM  TO  STRUCTURE  THE  OUTPUT  MESG 
WHEN  A  CATEGORY  RELATION  EXISTS  IN  TWO  MODELS 
AND  CALL  "ADDPARM" 


ARGUMENTS : 


IND-EC-NAME 

RC-NAME 

CAT-COUNT 


DSPLY[X(30) ] 
DSPLY[X(30)  ] 
DSPLY[S9 (9)  ] 


ROUTINES  CALLED: 
ADDPARM 


PROGRAMS 
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NAME:  CRTALI 

PURPOSE:  CREATES  ALIASES  FOR  AN  ENTITY  OR  ATTRIBUTE. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRTALI 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


CREATES  ALIASES  FOR  AN  ENTITY  OR  ATTRIBUTE 

DEPENDING  ON  WHETHER  AN  ENTITY  OR 
ATTRIBUTE  HAS  BE  CREATED,  VERIFY  THAT 
IT  EXISTS,  AND  THEN  INSERT  THE  ALIAS. 

ARGUMENTS : 

MODEL-NO  DSPLY [ S9 ( 9 ) ] 

INCLUDE  FILES: 


LISTNOS 

ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERENT 

UERROR 

VERATT 

CPFNXT 

UWARN 

INSECNM 

INSACNM 
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NAME;  CRTATT 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  CREATING  AN 
ATTRIBUTE. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CRTATT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION; 


CONTROLS  THE  PROCESSING  LOGIC  FOR  CREATING 
AN  ATTRIBUTE  AND  IT  RELATED  DATA  IN  A  MODEL. 

ONLY  A  SINGLE  ATTRIBUTE  HAVING  ONE  DOMAIN  IS 
IS  CREATED.  A  KEYWORD  LIST  MAY  OR  MAY  NOT  BE 
SPECIFIED  FOR  THE  ATTRIBUTE. 

modified;  sandy  singh  on  sep  21,  1988 

to  create  an  attribute  with  an  "undefined"  domain 


ARGUMENTS : 

MODEL-NO  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES; 


UNIQENO 

LISTNOS 

CHKMODL 

ROUTINES  CALLED: 


UERROR 

CPFONE 

LOWUPP 

VERDOM 

BLDATT 

INSACNM 

ADDKW 
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NAME:  CRTCAT 

PURPOSE:  CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING  A  NEW 
CATEGORY  RELATI 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CRTCAT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING 
A  NEW  CATEGORY  RELATION  WITHIN  A  MODEL.  CREATE 
CATEGORY  COMMAND  CONSISTS  OF  A  CATEGORY  RELATION 
CLAUSE,  MULTIPLE  CATEGORY  MEMEBERS  AND  AN 
OPTIONAL  KEYWORD  CLAUSE. 

ARGUMENTS : 


MODEL-NO  DSPLY [ S9 ( 9 ) ] 

RETURN-STATUS  DSPLY [ X ( 5 ) ] 

INCLUDE  FILES: 


UNIQENO 

LISTNOS 

ERRCDM 

CHKMODL 

ROUTINES  CALLED: 


UERROR 

CPFONE 

CPFNXT 

VERENT 

VERKCT 

VERAODM 

VERCRDA 

VERCR 

GETNNUM 

INSRC 

LOWUPP 

INSCATR 

INSCRC 

ADDKW 

VERVAL 

VERCMU 

VEKCMSV 

INSCATM 

ADDMIGC 
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NAME:  CRTDOM 

PURPOSE:  CREATE  NEW  DOMAIN  ON  CDM  DATABASE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRTDOM 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


GIVEN  A  DOMAIN  NAME  VERIFY  THAT  THE  DOMAIN  DOES 
NOT  ALREADY  EXIST,  AND  INSERT  THE  DOMAIN  AND  A 
DATA  TYPE  CLAUSE 

OBTAIN  THE  DOMAIN  NAME,  VERIFY  THAT 
IT  DID  NOT  PREVIOUSLY  EXIST,  FETCH  AN 
UNIQUE  DOMAIN  NUMBER,  AND  INSERT.  ALSO 
ADD  THE  DATE  TYPE  CLAUSE. 


INCLUDE  FILES: 


LISTNOS 

UNIQENO 


ROUTINES  CALLED: 


CPFONE 

VERDOM 

UERROR 

GETNNUM 

I NS DOM 

PROCDT 
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NAME:  CRTDSCT 

PURPOSE:  CREATES  DESCRIPTION  TYPE  IF  IT  DOES  NOT  EXIST 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRTDSCT 

SOURCE  FILE  TYPE:  COB 

HOST  l 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


YPE  IF  IT  DOES  NOT  EXIST 

DESCRIPTION  :-  STORES  LEGAL  DESCRIPTION  TYPES  IN 
THE  CDM.  CALLS  VERDSCT  TO  VERIFY  DESCRIPTION  TYPE 
THEN  CALLS  INSDSCT  TO  INSERT  DESCRIPTION  TYPE. 

YPES  FROM  CPFONE. 

YPE  TO  UPPER  CASE. 

NTERED  BY  USER 
ALREADY  EXISTS 
YPE  INTO  DATA  BASE 
YPE  FROM  CPFNEXT. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

LOWUPP 

VERDSCT 

UERROR 

INSDSCT 

CPFNXT 

ERRPRO 
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NAME:  CRTENT 

PURPOSE:  CONTROL  THE  PROCESSING  LOGIC  FOR  CREATING  A  NEW 
ENTITY  CLASS. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CRTENT 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROL  THE  PROCESSING  LOGIC  FOR  CREATING  A  NEW 
ENTITY  CLASS  AND  RELATED  DATA  IN  A  MODEL. 


ARGUMENTS : 


MODEL-NO  DSPLY [ S9 ( 9 ) ] 

EC-NO  DSPLY [S9 (9)] 


INCLUDE  FILES: 


UNIQENO 

LISTNGS 

CHKMODL 


ROUTINES  CALLED: 


UERROR 

CPFONE 

VERENT 

GETNNT'  i 

INSEC 

INSECNM 

ADDATT 

ADDKC 

ADDKW 
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NAME:  CRTMACR 

PURPOSE:  CREATE  FIRST  MACRO  OF  VERIFICATION  MODULE 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRTMACR 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CREATE  THE  FIRST  MACRO  OF  THE  VERIFICATION  MODULE 
MODIFIED  MAR  16,1988  TO  SUPPORT  FIOP'S 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

GEN-FILE-NAME 

FCB 

MOD-APNAME 

RET-STATUS 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[X] 
DSPLY[S9(9) ] 
DSPLY[S9(9)  ] 
DSPLY[X(80)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(10)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


CHKCDM 

ERRCDM 

MACDAT 

SBSTLST 

ERRFS 

ERRPRO 


ROUTINES  CALLED: 


GETHOST 

GENFIL 

UERROR 

OPNFIL 

RETVMOD 

CDPIC8 

ERRPRO 

CDMACRX 

APNAME 

OUTFIL 
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NAME:  CRTMAP 

PURPOSE:  CREATES  NEW  CS-IS  MAPPINGS  IN  THE  CDM 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  CRTMAP 

SOURCE  FILE  TYPE;  COB 

HOST; 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  CRTMAP  VALIDATES  ENTITY,  AUC  OR  RC  NAMES. 
DEPENDING  ON  MAPPING  PREFERENCE,  BRANCH 
TO  PERTINENT  ROUTINE. 

MODIFIED  5/1/89:  TO  HANDLE  CATEGORY  RELATIONS 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED; 


CPFONE 

ADDMAP 

VERENT 

UERROR 

CPFNXT 

LOWUPP 

VERRULE 

INSRULE 

VERAUC 

VERCR 

CONVCPF 

VERLR 

ERRPRO 
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NAME:  CRTMOD 

PURPOSE:  CONTROL  THE  PROCESSING  LOGIC  IF  CREATING  A  MODEL 
WITHIN  THE  SYSTEM. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  CRTMOD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THE  CREATE  MODEL  COMMAND  PROCESSOR  WILL 

CONTROL  THE  PROCESSING  LOGIC  IF  CREATING 
A  MODEL  WITHIN  THE  SYSTEM 


ARGUMENTS : 


CURRENT-MODEL-NO  DSPLY [ S9 ( 9 ) ] 

CUR-MOD-NAME  DSPLY [ X ( 3  0 ) ] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERMOD 

UERROR 

GETNNUM 

INSMOD 

UWARN 

ERRPRO 
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NAME:  CRTPART 

PURPOSE:  CREATES  USER  ENTERED  HORIZONTAL  PARTITIONS  ON  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRTPART 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CREATES  NEW  HORIZONTAL  PARTITIONS  ON 
CDM  IF  IT  DOES  NOT  EXIST.  (THERE  MUST 
BE  AT  LEAST  2  DATA  BASE/RECORD  TYPES 
CREATED  FOR  AND  ENTITY.) 

-  CALLS  ''VERECN''  TO  VERIFY  THE  ENTITY, 

CALLS  "VERHPN''  TO  VERIFY  THAT  THEPARTITION  DOES 
NOT  EXIST 

CALLS  ''VERDBRT''  TO  VERIFY  THE  DATA  BASE/RECORD 
TYPE 

CALLS  ''VERPART”  TO  VERIFY  THAT  THE  ENTITY  NUMBER 
AND  RECORD 
NUMBER  ARE  UNIQUE 

CALLS  "INSPART"  TO  INSERT  THE  PARTITION  NUMBER 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

CONVCPF 

VERECN 

UERROR 

VERHPN 

VERDBRT 

VERPART 

INSPART 

CPFNXT 

ERRPRO 
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NAME:  CRTRELA 

PURPOSE:  CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING  A  NEW 
LINK  RELATION 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  CRTRELA 
SOURCE  FIIJE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


CONTROLS  THE  LOGIC  FOR  VALIDATING  AND  CREATING 
A  NEW  LINK  RELATION  WITHIN  A  MODEL.  CREATE 
RELATION  COMMAND  CONSISTS  OF  A  RELATION  CLASS 
CLAUSE,  AN  OPTIONAL  MIGRATES  CLAUSE  AND  AN 
OPTIONAL  KEYWORD  CLAUSE. 


ARGUMENTS : 

MODEL-NO  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES: 


UNIQENO 

LISTNOS 

CHKMODL 

ROUTINES  CALLED: 


UERROR 

CPFONE 

CPFNXT 

VERENT 

VERLR 

GETNNUM 

CHKCARD 

INSLNKR 

INSRC 

ADDMIG 

ADDKW 
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NAME:  CRTUNIN 

PURPOSE:  CREATE  RECORD  UNION 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  CRTUNIN 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DEFINE  A  RECORD  TYPE  AS  A  UNION  OF 
CONCEPTUAL  ENTITIES 


ROUTINES  CALLED: 


DBLOOK 

ADDUNIN 
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NAME:  CRTVIEW 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  CREATE  VIEW 
COMMAND. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  CRTVIEW 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR 
THE  CREATE  VIEW  COMMAND 

EXTRACT  A  VIEW-NAME,  VERIFY  THAT  IT  DOES 
EXIST;  THEN  FETCH  A  UNIQUE  VIEW  NO. 

FROM  THE  POOL  AND 
INSERT  THE  VIEW  - 

THEN  PROCESS  THE  REMAINDER  OF  THE 
VIEW  COMMAND. 

INCLUDE  FILES: 


ERRCDM 

LISTNOS 

UNIQENO 

VWFROM 

VWRETR 

VWDI 

BOOLST 

CSQCLST 

ATTRNOS 

ROUTINES  CALLED: 


SET_LEVEL 

GET_FIRST_SYMB 

VERVIEW 

UERROR 

GETNNUM 

INSVIEW 

BLVWLST 

REMVIEW 

FREE_SYMTAB 

INSECRF 
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NAME:  CRTVLRG 

PURPOSE:  PERFORMS  EDITS  ON  NEW  VALUES  AND  RANGES 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  CRTVLRG 

SOURCE  FILE  TYPE:  COB 

HOST; 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION; 


-  RETRIEVES  THE  DOMAIN  VALUES  AND 
DOMAIN  RANGES  FOR  THE  STANDARD  DATA 
TYPE  OFF  THEIR  LISTS,  THEN  PERFORMS 
CERTAIN  EDIT  ON  THESE  VALUES  AND  RANGES 


ARGUMENTS : 


TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

RET-STATUS 


DSPLY[X] 
DSPLY[S9(9)  3 
DSPLY[S9(9)  ] 
DSPLY[S9  (9) 3 


INCLUDE  FILES: 


LISTNOS 


ROUTINES  CALLED; 


CPFONE 

VALVERF 

UERROR 

CPFNXT 

RNGVERF 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  CRTVMOD 

PURPOSE:  CREATE  VERIFICATION  MODULE  FOR  NEW  DOMAIN  VALUES  AND 
RANGES 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  CRTVMOD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-CREATE  VERIFICATION  MODULE  FROM  VALUES 
AND  RANGES  STATED  IN  THE  "CREATE  DOMAIN" 
STATEMENT.  THE  VALUES  AND  RANGES  ARE 
RETRIEVED  FROM  THEIR  LSITS  AND  THE 
CDM  DATA  BASE  IS  UPDATED  WITH  THESE 
VALUES . 

MODIFIED  MAR  16,1988  TO  SUPPORT  FIOPS 
MODIFIED  AUG  8,  1989  CODE  &  LOCAL  VARIABLES 
SUPPORTING  THE  VERIFICATION 
MODULE  WERE  REMOVED. 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[X] 
DSPLY[S9 (9) ] 
DSPLY[S9(9) ] 
DSPLY[S9(9) ] 


LISTNOS 

CHKCDM 

ERRCDM 

MACDAT 

SBSTLST 

ERRFS 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

CPFNXT 

INSVAL 

UERROR 

INSRNG 

ERRPRO 


ARGUMENTS : 


DOM-NO 

DOM-NAME 

TYPE-ID 

MAX-SIZE 

NO-OF-DEC 

NDDL-STATUS 

INCLUDE  FILES: 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  DBLOOK 

PURPOSE:  DATA  BASE  -  RECORD  TYPE  VERIFICATION 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DBLOOK 

SOURCE  FILE  TYPE:  COB 

HOST  s 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  RETRIEVE  DATABASE  &  RECORD  NUMBER  GIVEN 
RECORD  TYPE  NAME  AND  DATA  BASE  NAME 

-  OBTAIN  DATA  BASE  AND  RECORD  NAME  FROM  PARSER. 
THEN  GO  AGAINST  THE  CDM  TO  OBTAIN 

THE  DATABASE  AND  RECORD  NUMBER 

ARGUMENTS : 


DB-NAME 

RT-ID 

DB-ID 

RT-NO 

INCLUDE  FILES: 


LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

VERDB 

UERROR 

VERRT 

ERRPRO 


DSPLY[X(30)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 
DSPLY[S9 (9)  ] 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  DEFALG 

PURPOSE:  DEFINE  A  COMPLEX  MAPPING  ALGORITHM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DEFALG 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


DEFINE  THE  USE  OF  A  PREVIOUSLY  CREATED 
SOFTWARE  MODULE  AS  A  COMPLEX  MAPPING  ALGORITHM. 
INPUT  AND  OUTPUT  PARAMETERS  ARE  DEFINED  FOR 
THE  MODULE.  THESE  PARAMETERS  MAY  BE  ONE  OF 
THE  FOLLOWING:  DATAITEMS,  ATTRIBUTES, 

DATAFIELDS,  RECORDS  OR  CONSTANTS.  A  MODULE 
RETURN-STATUS  MUST  BE  THE  LAST  OUTPUT  PARAMETER 
AND  MUST  CONFORM  TO  THE  IISS  ERROR  HANDLING 
PHILOSOPHY. 

VERIFY  THAT  THE  SOFTWARE  MODULE  HAS  BEEN 
PREVIOUSLY  DEFINED.  RETRIEVE  INTO  CMP-TABLE 
THE  MODULES  PARAMETERS  IN  SEQUENCE. 

EXTRACT  FROM  THE  PARSER  LISTS,  THE  INPUTS 
AND  OUTPUTS  TO  THE  ALGORITHM,  ALSO  POPULATE 
CMP-TABLE.  MAPPINGS  MAY  BE  FROM  EXTERNAL  TO 
CONCEPTUAL  OR  VICE  VERSA  AD  THESE  INVOLVE 
PREVIOUSLY  DEFINED  DATAITEMS  AND  ATTRIBUTES. 
MAPPINGS  MAY  ALSO  BETWEEN  CONCEPTUAL  AND 
INTERNAL  AND  THESE  INVOLVE  ATTRIBUTES  AND  FIELDS  OR 
RECORDS, WHICH  MUST  HAVE  BEEN  PREVIOUSLY  DEFINED. 
CHECKS  ARE  THEN  PERFORMED  TO  ENSURE  THE 

LEGALITY  OF  THE  ALGORITHM,  BEFORE  BEING 
INSERTED  IN  THE  CDM. 

THE  ALGORITHM  COMMAND  ALSO  POPULATES  THE 
AUC_IS_MAPPING  TABLE  IN  CASE  OF  CS-IS  ALGORITHMS 

INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ALGTBL 

ERRPRO 

ROUTINES  CALLED: 


ALGCHK 

ALGDTN 

CPFONE 

LOWUPP 

CONVCPF 

VERALGI 

UERROR 

VERPARM 

VERDTYP 

CPFCOR 

CPFNXT 
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VERDI DN 

VERTAG 

VERDBRT 

VERDTFL 

INSTGPA 

INSDIPA 

INSRTPA 

INSDFPA 

INSCOPA 

ERRPRO 

DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFAREA 

PURPOSE:  PROCESSES  THE  AREA  INFORMATION  . 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DEFAREA 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  AREA  INFORMATION  IF  THE  DBMS  IS 
IDS-II,  IDMS  AND  VAX-11. 


ARGUMENTS : 


DB-ID 

RT-ID 

NDDL-STATUS 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERAREA 

UERROR 

INSDAA 

CPFNXT 

ERRPRO 


DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9 (9)  ] 
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IX)CGROUP  PS41100  Module  Documentation 


NAME:  DEFCODL 

PURPOSE:  PROCESSES  THE  DBMS  TYPES:  VAX-11,  IDMS,  IDS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DEFCODL 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  DBMS  TYPES: 

VAX- 11 

IDMS 

IDS-II 

First,  extract  the  schema,  subschema  and  area  names, 
verifying  that  the  area  name  does  not  exist, 
insert  into  the  cdm.  Repeat  till  no  more  area  names. 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

UERROR 

CPFNXT 

INSSCH 

VERAREA 

UWARN 

INSAREA 

ERRPRO 


ARGUMENTS : 


DB-ID 

RETURN-STATUS 


II. 


After 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFDB 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A  DATABASE 
TO  THE  SYSTEM. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  DEFDB 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 
DATABASE  TO  THE  SYSTEM. 

extract  the  dbms  type  ,data  base  name  and  host  id 
from  the  parser  lists. 

After  verifying  that  the  data  base  does  not 

already  exist,  insert  it  into  the  CDM.  Now  process  the  DBMS 
type  depending  on  whether  it  is  Total,  IMS,  ORACLE,  VAX-11, 
IDMS  or  IDS-II. 


INCLUDE  FILES: 


LISTNOS 

UNIQENO 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERDBMS 

UERROR 

rX)WUPP 

VERDB 

VERHST 

GETNNUM 

INSDB 

DEFORCE 

DEFCODL 

DEFIMS 

CHGLOBL 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFDBMS 

PURPOSE:  POPULATES  DBMS  TABLE  AND  DBMS_ON_HOST  TABLE  IF 
NECESSARY 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DEFDBMS 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  SETS  UP  AND  CALI^  INSDBMS  WHICH 
ADDS  A  DBMS_NAME  AND  DB_MODEL  TO  THE 
DBMS  TABLE.  ALSO,  FOR  EACH  HOST_ID 
SPECIFIED,  THIS  PROGRAM  CALLS  VERHST 
TO  VERIFY  THAT  THE  HOST_ID  IS  ON  THE 
HOST  TABLE  AND  THEN  CALLS  INSDBH  TO 
INSERT  A  DBMS  /  HOST  ASSOCIATION  IN 
THE  DBMS  ON  HOST  TABLE. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

UERROR 

INSDBMS 

INSDBH 

CPFNXT 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFHST 

PURPOSE:  POPULATES  HOST  TABLE  AND  DBMS_ON_HOST  TABLE  IF 
NECESSARY 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DEFHST 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CALLS  GETNNUM  TO  GET  A  HOST-NO  FOR  THE 
HOST-ID.  THEN  CALLS  INSHST  TO  INSERT  INTO 
THE  HOST  TABLE  THE  HOST-ID  AND  HOST-NO. 

IF  THEIR  ARE  ANY  DBMS  SPECIFIED  TO  BE 
ASSOCIATED  WITH  THE  HOST-ID,  INSDBH 
IS  CALLED  TO  ADD  THE  DBMS-NAME  AND 
HOST- ID  TO  THE  DBMS  ON  HOST  TABLE. 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

UNIQENO 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERHST 

UERROR 

GETNNUM 

INSHST 

INSDBH 

CPFNXT 

ERRPRO 
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DOCGROUP  PS41100  Mo.^ule  Documentation 


NAME:  DEFIMS 

PURPOSE:  PROCESSES  THE  DBMS  TYPE:  IMS. 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DEFIMS 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  DBMS  TYPE:  IMS 

First  extract  the  PSB  sequence  number,  key  feedback  length, 

and  PSB  name  from  the  parser  lists.  After  verifying 

that  the  psb  name  does  not  previously  exist, 

insert  into  PSB  and 

PSB  PCB. 


DSPLYtS9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 


LISTNOS 

ERRCDM 

ERRPRO 

ROUTINES  CALLED: 


CPFONE 

UERROR 

CPFNXT 

VERDPSB 

INSPCB 

ERRPRO 


ARGUMENTS : 


DB-ID 
HOST- ID 
RETURN -STATUS 


INCLUDE  FILES: 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFORCL 

PURPOSE:  PROCESSES  THE  DBMS  TYPE:  ORACLE. 

LANGUAGE:  VAX-11  COBOL 

SOURCE  FILE:  DEFORCL 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  PROCESSES  THE  DBMS  TYPE:  ORACLE 

Extract  the  password  from  the  parser  lists,  then  insert  the 

oracle  database  id  and  password. 


ARGUMENTS : 


DB-ID  DSPLY[S9(9)] 

RETURN-STATUS  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

UERROR 

INSPWRD 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  DEFPSB 

PURPOSE:  PROGRAM  NAME  DEFPSB 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DEFPSB 

SOURCE  FILE  TYPE:  COB 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  ADD  A  IMS  PROGRAM  SPECIFICATION  BLOCK 
(PSB)  NAME  TO  THE  PSB  TABLE 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 

ERRPRO 


ROUTINES  CALLED: 


CPFONE 

VERPSB 

UERROR 

VERHST 

VERDBH 

INSIPSB 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFREC 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A  RECORD 
FOR  THE  SYSTEM. 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DEFREC 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  CONTROLS  THE  PROCESSING  LOGIC  FOR  DEFINING  A 
RECORD  FOR  THE  SYSTEM. 

AFTER  EXTRACTING  THE  DB-ID  AND  RT-ID,  VERIFY  THAT  THE  RECORD 
TYPE  DID  NOT  PREVIOUSLY  EXIST.  IF  IT  DID  NOT,  PROCESS  THE 
AREA  INFORMATION  AND  FIELD  INFORMATION. 


INCLUDE  FILES: 


LISTNOS 

ERRCDM 

UNIQENO 

ERRPRO 


ROUTINES  CALLED: 


GETRDH 

UERROR 

VERRT 

GETNNUM 

INSRTYP 

DEFFLD 

DEFAREA 

VERAREA 

I NS ARE A 

INSDAA 

ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFSET 

PURPOSE:  CONTROLS  THE  PROCESSING  LOGIC  FOR  THE  DEFINE  SET 
COMMAND. 

LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  DEFSET 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


CONTROLS  THE  PROCESSING  LOGIC  FOR  THE 
DEFINE  SET  COMMAND. 

THE  FOLLOWING  DBMS  ARE  LEGAL  FOR  THIS  PROCESS: 
TOTAL,  IMS,  VAX-11,  IDMS,  IDS 

DBMS  RULES 


ORACLE 

TOTAL 

IMS  * 

VAX- 11 

IDMS 

IDS 

*  CODASYL  DBMS ' S 

* 

RULE 

* 

SETS 

NO 

YES 

YES 

YES 

YES 

YES 

EQUIRED/ 

PTIONAL 

NO 

NO 

NO 

YES 

YES 

YES 

OR  MEMBERS 

INKAGE/ 

ATA  FIELD  NO 

YES 

NO 

NO 

NO 

NO 

INGLE 

EMBER 

NO 

YES 

YES 

YES 

YES 

YES 

LLOWED 

ULTIPLE 

EMBERS 

NO 

NO 

NO 

YES 

YES 

YES 

INCLUDE  FILES: 


LISTNOS 

UNIQENO 

ROUTINES  CALLED: 


GETDBST 

UERROR 

VERRSET 

CPFONE 

VERRT 

CPFNXT 

INSSTM 

GETNNUM 

INSRSET 

VERDTFL 

INSDSL 

CPFCOR 

LOWUPP 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DEFSMOD 

PURPOSE:  DEFINE  SOFTWARE  MODULE 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  DEFSMOD 
SOURCE  FILE  TYPE:  COB 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  CREATE  SOFTWARE  MODULE  AND  MODULE 
PARAMETERS 


INCLUDE  FILES: 


ERRCDM 

LISTNOS 


ROUTINES  CALLED: 


CPFONE 

VERSMOD 

UERROR 

INSSMOD 

VERDT 

VERAPRM 

INSAPRM 

CPFNXT 
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[KDCGROUP  PS41100  Module  Documentation 


NAME:  DELIAIM 

PURPOSE.  DELETE  A  MAPPED  TAG  GIVEN  THE  TAG_NO,  EC_NO, 
RT_NO 

LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELIAIM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  FROM  AUC_IS_MAPPING  GIVEN  THE  KEY_CLASS 
MEMBERS,  TAG,  RECORD,  AND  ENTITY  NUMBER. 


ARGUMENTS : 


TAG-NO 

EC-NO 

RT-NO 

RET-STATUS 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


DSPLY[S9(9) ] 
DSPLY[S9 (9)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(5)  ] 


ROUTINES  CALLED: 


ERRPRO 


AND 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DELIASM 

PURPOSE:  PROGRAM  NAME  DELIASM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DELIASM 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  ONE  AUC  SET  MAPPING  FROM  THE  CDM 


ARGUMENTS : 


DB-NO 

SET-NAME 

TAG-NO 

RET-STATUS 


DSPLY[S9 (9) ] 
DSPLY[X(30) ] 
DSPLY[S9(9)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DELIERT 

PURPOSE:  DELETE  A  SPECIFIED  ENTITY  TO  RECORD  MAPPING 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DELIERT 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  ONE  ROW  FROM  EC_RT_MAPPING 
FOR  A  GIVEN  EC_NO  AND  RT_NO  PROVIDED 
NO  OTHER  MAPPING  IS  DEPENDENT  ON  IT 
(I.E.  AUC_IS_MAPPING  AND/OR  ECRTUD) 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ARGUMENTS : 


EC-NO 

RT-NO 

RET-STATUS 


ROUTINES  CALLED: 


ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DELIPDF 

PURPOSE:  PROGRAM  NAME  DELIPDF 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELIPDF 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  ONE  DATA  FIELD  MAPPING  FROM 
PROJECT  DATA  FIELD  TABLE  IN  THE  CDM. 


ARGUMENTS : 


DB-NO 

REC-NAME 

DF-NAME 

TAG-NO 

RET-STATUS 


DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[X(30)  ] 
DSPLY[S9(9)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 
NAME:  DELIPRF 

PURPOSE:  PROGRAM  NAME  DELIPRF 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELIPRF 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 

DESCRIPTION: 


-  DELETES  A  SINGLE  MAPPING  FROM  THE  CDM 
FOR  A  GIVEN  TAG  NUMBER  AND  PREFERENCE 

ARGUMENTS : 


TAG-NO  DSPLY [ S9 ( 9 ) ] 
PREF-NO  DSPLY [ S9 ( 9 ) ] 
RET-STATUS  DSPLY [ X ( 5 ) ] 

INCLUDE  FILES: 


ERRCDM 

ERRPRO 

ROUTINES  CALLED: 


ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DELAAA 

PURPOSE:  DROP  THE  AREA-ID  FROM  CDM 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DELAAA 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  AREA  FROM  FROM  CDM 


ARGUMENTS : 


DB-ID 
RT-ID 
AREA- ID 
RET-STATUS 


DSPLYtS9 (9) ] 
DSPLYtX(30) ] 
DSPLY[X(30)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 
ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DELACON 

PURPOSE:  DELETE  ATTRIBUTE  CONSTRAINTS 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DELACON 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


DELETE  ATTRIBUTE  CONSTRAINTS  FROM 
AUC  CONSTRAINT 


ARGUMENTS : 


TAG-NO  DSPLY[S9(9)] 

RETURN-STATUS  DSPLY [ S9 ( 9 ) ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  DELAISM 

PURPOSE:  PROGRAM  NAME  DELAISM 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELAISM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  ALL  AUC  MAPPINGS  FROM  THE  CDM 
FOR  A  GIVEN  TAG  NUMBER. 


DSPLY[S9(9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

ERRPRO 


ARGUMENTS : 


TAG-NO 

RET-STATUS 


ROUTINES  CALLED: 
ERRPRO 
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DOCGROUP  PS41100  Module  Documentation 


NAME:  DELAPRM 

PURPOSE;  DELETE  AN  OCCURRENCE  FROM  MODULE  PARAMETER 

LANGUAGE;  VAX- 11  COBOL 

SOURCE  FILE:  DELAPRM 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION: 


-  DELETE  AN  OCCURRENCE  FROM  MODULE_PARAMETER 
GIVEN  MODULE  NAi4E  (MOD_ID)  AND  PARAMETER 
NAME  (PARM_NAME) 


ARGUMENTS : 


MOD-ID  DSPLY[X(10)] 
PARM-NAME  DSPLY [ X { 3  0 ) ] 
RET-STATUS  DSPLY [ X ( 5 ) ] 


INCLUDE  FILES; 


ERRCDM 

SRVRET 

ERRPRO 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  DELAREA 

PURPOSE:  NDML  COMMAND  TO  DELETE  AREAS/FILES  ASSOC.  WITH 
CODASYL/TOTAL  DB 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELAREA 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


PRODUCES  AN  NDML  STATEMENT  TO  DELETE  THE  AREAS  (TOTAL 
FILES)  ASSOCIATED  WITH  A  CODASYL  (TOTAL)  DATABASE  IN  THE 
DATA_BASE_AREA  TABLE  OF  THE  CDM. 

DELETE  THE  AREA  ID  BASED  ON  THE  DATA  BASE  ID. 


ARGUMENTS : 


DB-ID 
AREA -NAME 
RET-STATUS 


DSPLY[S9(9)  ] 
DSPLY[X(30)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 

ROUTINES  CALLED: 


ERRPRO 
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NAME:  DELASM 

PURPOSE:  PROGRAM  NAME  DELASM 
LANGUAGE:  VAX-11  COBOL 
SOURCE  FILE:  DELASM 
SOURCE  FILE  TYPE:  PRC 
HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


-  DELETES  ALL  SET  MAPPINGS  WITH 
A  SPECIFIED  TAG  NDK3ER. 


DSPLY[S9 (9) ] 
DSPLY[X(5) ] 


INCLUDE  FILES: 


ERRCDM 

ERKFRO 


ARGUMENTS : 


TAG -NO 
RET-STATUS 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  DELCONI 

PURPOSE:  DELETE  CONSTRAINT  INPUTS  ASSOCIATED  WITH  AN  AUC 

LANGUAGE:  VAX- 11  COBOL 

SOURCE  FILE:  DELCONI 

SOURCE  FILE  TYPE:  PRC 

HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  DELETES  ALL  CONSTRAINT  INPUTS 
ASSOCIATED  WITH  AN  AUC 


ARGUMENTS : 


DSPLY[S9 (9) ] 
DSPLY[S9 (9) ] 


INCLUDE  FILES: 


ERRCDM 

SRVRET 

ERRPRO 


TAG-NO 

RETURN-STATUS 


ROUTINES  CALLED: 
ERRPRO 
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NAME:  DELDBDF 

PURPOSE:  DELETE  ALL  DATA  FIELD  ASSOCIATIONS  WITH  THE  DATABASE 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELDBDF 
SOURCE  FILE  TYPE:  PRC 
>  HOST: 

SUBSYSTEM:  CDM 
SUBDIRECTORY:  NDDL 


DESCRIPTION: 


THIS  ROUTINE  WAS  DESIGNED  FOR  USE  WITH 

DRPDB  (DROP  DATA  BASE) 

THIS  ROUTINE  VERIFIES  THE  EXISTANCE  OF  A  DATA  FIELD, 

SELECT  A  DATA  FIELD  ONE  AT  A  TIME  IN  THE  NDML  LOOP, 
DELETES  THE  DATA  FIELD,  DELETES  THE  TEXTUAL  DESCRIPTION, 
AND  ADDS  THE  REUSABLE  NUMBER  BACK  IN  THE  CDM. 

IT  HAS  ONE  INPUT  PARAMETER  (DB-ID)  AND  ONE 
OUTPUT  PARAMETER  FOUND-STATUS  (0  GOOD  AND  -1 
AN  ERROR  HAS  OCCURRED.  ALL  ERRORS  ARE  COVERED 
BY  ERROR  STATEMENTS  IN  THE  ROUTINE. 


DSPLY[S9(9) ] 
DSPLY[S9(9) ] 


INCLUDE  FILES: 


SRVRET 

UNIQENO 

ERRPRO 

ROUTINES  CALLED: 


VERDFUS 

UERROR 

DELDFL3 

ADDRNUM 

DELTEXT 

ERRPRO 


ARGUMENTS : 


DB-ID 

FOUND-STATUS 
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NAME;  DELDBH 

PURPOSE:  NDML  STATEMENT  TO  DELETE  DBMS/HOST  DEFINITION  FROM 
DBMS_ON_HOST  TABL 
LANGUAGE:  VAX- 11  COBOL 
SOURCE  FILE:  DELDBH 
SOURCE  FILE  TYPE;  PRC 
HOST; 

SUBSYSTEM;  CDM 
SUBDIRECTORY;  NDDL 


DESCRIPTION; 


-  PRODUCES  A  DELETE  NDML  STATEMENT  TO 
DELETE  A  DBMS  /  HOST  DEFINITION  FROM  THE 
DBMS  ON  HOST  TABLE. 


ARGUMENTS ; 


HOST-ID 
DBMS -NAME 
RET-STATUS 


DSPLY[X{30)  ] 
DSPLY[X(30)  ] 
DSPLY[X(5)  ] 


INCLUDE  FILES: 


ERRCDM 

ERRPRO 


ROUTINES  CALLED: 


ERRPRO 
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